/ SGI Freeware 1999 August / SGI Freeware 1999 August.iso / dist / fw_xemacs.idb / usr / freeware / lib / xemacs-20.4 / lisp / leim / quail.elc.z / quail.elc

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar  9 12|
|00000040| 3a 35 30 3a 30 31 20 31 | 39 39 38 0a 3b 3b 3b 20 |:50:01 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 6c 65 69 6d |s-20.3/l|isp/leim|
|000000a0| 2f 71 75 61 69 6c 2e 65 | 6c 0a 3b 3b 3b 20 65 6d |/quail.e|l.;;; em|
|000000b0| 61 63 73 20 76 65 72 73 | 69 6f 6e 20 32 30 2e 34 |acs vers|ion 20.4|
|000000c0| 20 22 45 6d 65 72 61 6c | 64 22 20 58 45 6d 61 63 | "Emeral|d" XEmac|
|000000d0| 73 20 20 4c 75 63 69 64 | 2e 0a 3b 3b 3b 20 62 79 |s  Lucid|..;;; by|
|000000e0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 32 |tecomp v|ersion 2|
|000000f0| 2e 32 35 20 58 45 6d 61 | 63 73 3b 20 32 32 2d 4d |.25 XEma|cs; 22-M|
|00000100| 61 72 2d 39 36 2e 0a 3b | 3b 3b 20 6f 70 74 69 6d |ar-96..;|;; optim|
|00000110| 69 7a 61 74 69 6f 6e 20 | 69 73 20 6f 6e 2e 0a 3b |ization |is on..;|
|00000120| 3b 3b 20 74 68 69 73 20 | 66 69 6c 65 20 75 73 65 |;; this |file use|
|00000130| 73 20 6f 70 63 6f 64 65 | 73 20 77 68 69 63 68 20 |s opcode|s which |
|00000140| 64 6f 20 6e 6f 74 20 65 | 78 69 73 74 20 69 6e 20 |do not e|xist in |
|00000150| 45 6d 61 63 73 20 31 39 | 2e 0a 0a 28 69 66 20 28 |Emacs 19|...(if (|
|00000160| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 6d 61 |and (bou|ndp 'ema|
|00000170| 63 73 2d 76 65 72 73 69 | 6f 6e 29 0a 09 20 28 6f |cs-versi|on).. (o|
|00000180| 72 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |r (and (|boundp '|
|00000190| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 20 |epoch::v|ersion) |
|000001a0| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 0a |epoch::v|ersion).|
|000001b0| 09 20 20 20 20 20 28 73 | 74 72 69 6e 67 2d 6c 65 |.     (s|tring-le|
|000001c0| 73 73 70 20 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |ssp emac|s-versio|
|000001d0| 6e 20 22 32 30 22 29 29 | 29 0a 20 20 20 20 28 65 |n "20"))|).    (e|
|000001e0| 72 72 6f 72 20 22 60 71 | 75 61 69 6c 2e 65 6c 27 |rror "`q|uail.el'|
|000001f0| 20 77 61 73 20 63 6f 6d | 70 69 6c 65 64 20 66 6f | was com|piled fo|
|00000200| 72 20 45 6d 61 63 73 20 | 32 30 22 29 29 0a 0a 28 |r Emacs |20"))..(|
|00000210| 6f 72 20 28 62 6f 75 6e | 64 70 20 27 63 75 72 72 |or (boun|dp 'curr|
|00000220| 65 6e 74 2d 6c 6f 61 64 | 2d 6c 69 73 74 29 20 28 |ent-load|-list) (|
|00000230| 73 65 74 71 20 63 75 72 | 72 65 6e 74 2d 6c 6f 61 |setq cur|rent-loa|
|00000240| 64 2d 6c 69 73 74 20 6e | 69 6c 29 29 0a 0a 0a 28 |d-list n|il))...(|
|00000250| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 c1 21 ab 86 |byte-cod|e "..!..|
|00000260| c2 c3 21 88 aa 84 c2 c4 | 21 88 c0 87 22 20 5b 66 |..!.....|!..." [f|
|00000270| 65 61 74 75 72 65 70 20 | 78 65 6d 61 63 73 20 72 |eaturep |xemacs r|
|00000280| 65 71 75 69 72 65 20 6f | 76 65 72 6c 61 79 20 66 |equire o|verlay f|
|00000290| 61 63 65 73 5d 20 32 29 | 0a 23 40 31 33 34 20 54 |aces] 2)|.#@134 T|
|000002a0| 68 65 20 63 75 72 72 65 | 6e 74 20 51 75 61 69 6c |he curre|nt Quail|
|000002b0| 20 70 61 63 6b 61 67 65 | 2c 20 77 68 69 63 68 20 | package|, which |
|000002c0| 64 65 70 65 6e 64 73 20 | 6f 6e 20 74 68 65 20 63 |depends |on the c|
|000002d0| 75 72 72 65 6e 74 20 69 | 6e 70 75 74 20 6d 65 74 |urrent i|nput met|
|000002e0| 68 6f 64 2e 0a 53 65 65 | 20 74 68 65 20 64 6f 63 |hod..See| the doc|
|000002f0| 75 6d 65 6e 74 61 74 69 | 6f 6e 20 6f 66 20 60 71 |umentati|on of `q|
|00000300| 75 61 69 6c 2d 70 61 63 | 6b 61 67 65 2d 61 6c 69 |uail-pac|kage-ali|
|00000310| 73 74 27 20 66 6f 72 20 | 74 68 65 20 66 6f 72 6d |st' for |the form|
|00000320| 61 74 2e 1f 0a 28 64 65 | 66 76 61 72 20 71 75 61 |at...(de|fvar qua|
|00000330| 69 6c 2d 63 75 72 72 65 | 6e 74 2d 70 61 63 6b 61 |il-curre|nt-packa|
|00000340| 67 65 20 6e 69 6c 20 28 | 23 24 20 2e 20 36 37 31 |ge nil (|#$ . 671|
|00000350| 29 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |)).(byte|-code ".|
|00000360| c1 21 88 c2 c1 c3 c4 23 | 88 c5 c6 21 ac 83 c7 16 |.!.....#|...!....|
|00000370| 06 c6 0e 08 42 16 08 c5 | c9 21 ac 83 c7 16 09 c9 |....B...|.!......|
|00000380| 0e 08 42 16 08 c0 c6 21 | 88 c2 c6 c3 c4 23 88 c5 |..B....!|.....#..|
|00000390| ca 21 ac 83 c7 16 5c 6e | ca 0e 08 42 16 08 c0 ca |.!....\n|...B....|
|000003a0| 21 87 22 20 5b 6d 61 6b | 65 2d 76 61 72 69 61 62 |!." [mak|e-variab|
|000003b0| 6c 65 2d 62 75 66 66 65 | 72 2d 6c 6f 63 61 6c 20 |le-buffe|r-local |
|000003c0| 71 75 61 69 6c 2d 63 75 | 72 72 65 6e 74 2d 70 61 |quail-cu|rrent-pa|
|000003d0| 63 6b 61 67 65 20 70 75 | 74 20 70 65 72 6d 61 6e |ckage pu|t perman|
|000003e0| 65 6e 74 2d 6c 6f 63 61 | 6c 20 74 20 62 6f 75 6e |ent-loca|l t boun|
|000003f0| 64 70 20 71 75 61 69 6c | 2d 67 75 69 64 61 6e 63 |dp quail|-guidanc|
|00000400| 65 2d 62 75 66 20 6e 69 | 6c 20 63 75 72 72 65 6e |e-buf ni|l curren|
|00000410| 74 2d 6c 6f 61 64 2d 6c | 69 73 74 20 71 75 61 69 |t-load-l|ist quai|
|00000420| 6c 2d 63 6f 6d 70 6c 65 | 74 69 6f 6e 2d 62 75 66 |l-comple|tion-buf|
|00000430| 20 71 75 61 69 6c 2d 67 | 75 69 64 61 6e 63 65 2d | quail-g|uidance-|
|00000440| 77 69 6e 5d 20 34 29 0a | 23 40 33 33 20 4e 6f 6e |win] 4).|#@33 Non|
|00000450| 2d 6e 69 6c 20 69 66 20 | 69 6e 20 51 75 61 69 6c |-nil if |in Quail|
|00000460| 20 6d 69 6e 6f 72 20 6d | 6f 64 65 2e 1f 0a 28 64 | minor m|ode...(d|
|00000470| 65 66 76 61 72 20 71 75 | 61 69 6c 2d 6d 6f 64 65 |efvar qu|ail-mode|
|00000480| 20 6e 69 6c 20 28 23 24 | 20 2e 20 31 31 30 31 29 | nil (#$| . 1101)|
|00000490| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|000004a0| 21 88 c2 c1 c3 c4 23 87 | 22 20 5b 6d 61 6b 65 2d |!.....#.|" [make-|
|000004b0| 76 61 72 69 61 62 6c 65 | 2d 62 75 66 66 65 72 2d |variable|-buffer-|
|000004c0| 6c 6f 63 61 6c 20 71 75 | 61 69 6c 2d 6d 6f 64 65 |local qu|ail-mode|
|000004d0| 20 70 75 74 20 70 65 72 | 6d 61 6e 65 6e 74 2d 6c | put per|manent-l|
|000004e0| 6f 63 61 6c 20 74 5d 20 | 34 29 0a 23 40 36 33 20 |ocal t] |4).#@63 |
|000004f0| 4f 76 65 72 6c 61 79 20 | 77 68 69 63 68 20 63 6f |Overlay |which co|
|00000500| 76 65 72 73 20 74 68 65 | 20 63 75 72 72 65 6e 74 |vers the| current|
|00000510| 20 74 72 61 6e 73 6c 61 | 74 69 6f 6e 20 72 65 67 | transla|tion reg|
|00000520| 69 6f 6e 20 6f 66 20 51 | 75 61 69 6c 2e 1f 0a 28 |ion of Q|uail...(|
|00000530| 64 65 66 76 61 72 20 71 | 75 61 69 6c 2d 6f 76 65 |defvar q|uail-ove|
|00000540| 72 6c 61 79 20 6e 69 6c | 20 28 23 24 20 2e 20 31 |rlay nil| (#$ . 1|
|00000550| 32 36 34 29 29 0a 28 6d | 61 6b 65 2d 76 61 72 69 |264)).(m|ake-vari|
|00000560| 61 62 6c 65 2d 62 75 66 | 66 65 72 2d 6c 6f 63 61 |able-buf|fer-loca|
|00000570| 6c 20 27 71 75 61 69 6c | 2d 6f 76 65 72 6c 61 79 |l 'quail|-overlay|
|00000580| 29 0a 23 40 36 32 20 4f | 76 65 72 6c 61 79 20 77 |).#@62 O|verlay w|
|00000590| 68 69 63 68 20 63 6f 76 | 65 72 73 20 74 68 65 20 |hich cov|ers the |
|000005a0| 74 65 78 74 20 74 6f 20 | 62 65 20 63 6f 6e 76 65 |text to |be conve|
|000005b0| 72 74 65 64 20 69 6e 20 | 51 75 61 69 6c 20 6d 6f |rted in |Quail mo|
|000005c0| 64 65 2e 1f 0a 28 64 65 | 66 76 61 72 20 71 75 61 |de...(de|fvar qua|
|000005d0| 69 6c 2d 63 6f 6e 76 2d | 6f 76 65 72 6c 61 79 20 |il-conv-|overlay |
|000005e0| 6e 69 6c 20 28 23 24 20 | 2e 20 31 34 31 35 29 29 |nil (#$ |. 1415))|
|000005f0| 0a 28 6d 61 6b 65 2d 76 | 61 72 69 61 62 6c 65 2d |.(make-v|ariable-|
|00000600| 62 75 66 66 65 72 2d 6c | 6f 63 61 6c 20 27 71 75 |buffer-l|ocal 'qu|
|00000610| 61 69 6c 2d 63 6f 6e 76 | 2d 6f 76 65 72 6c 61 79 |ail-conv|-overlay|
|00000620| 29 0a 23 40 34 34 20 43 | 75 72 72 65 6e 74 20 6b |).#@44 C|urrent k|
|00000630| 65 79 20 66 6f 72 20 74 | 72 61 6e 73 6c 61 74 69 |ey for t|ranslati|
|00000640| 6f 6e 20 69 6e 20 51 75 | 61 69 6c 20 6d 6f 64 65 |on in Qu|ail mode|
|00000650| 2e 1f 0a 28 64 65 66 76 | 61 72 20 71 75 61 69 6c |...(defv|ar quail|
|00000660| 2d 63 75 72 72 65 6e 74 | 2d 6b 65 79 20 6e 69 6c |-current|-key nil|
|00000670| 20 28 23 24 20 2e 20 31 | 35 37 35 29 29 0a 23 40 | (#$ . 1|575)).#@|
|00000680| 35 32 20 43 75 72 72 65 | 6e 74 6c 79 20 73 65 6c |52 Curre|ntly sel|
|00000690| 65 63 74 65 64 20 74 72 | 61 6e 73 6c 61 74 69 6f |ected tr|anslatio|
|000006a0| 6e 20 6f 66 20 74 68 65 | 20 63 75 72 72 65 6e 74 |n of the| current|
|000006b0| 20 6b 65 79 2e 1f 0a 28 | 64 65 66 76 61 72 20 71 | key...(|defvar q|
|000006c0| 75 61 69 6c 2d 63 75 72 | 72 65 6e 74 2d 73 74 72 |uail-cur|rent-str|
|000006d0| 20 6e 69 6c 20 28 23 24 | 20 2e 20 31 36 36 37 29 | nil (#$| . 1667)|
|000006e0| 29 0a 23 40 33 33 31 20 | 43 6f 6e 73 20 6f 66 20 |).#@331 |Cons of |
|000006f0| 69 6e 64 69 63 65 73 20 | 61 6e 64 20 76 65 63 74 |indices |and vect|
|00000700| 6f 72 20 6f 66 20 70 6f | 73 73 69 62 6c 65 20 74 |or of po|ssible t|
|00000710| 72 61 6e 73 6c 61 74 69 | 6f 6e 73 20 6f 66 20 74 |ranslati|ons of t|
|00000720| 68 65 20 63 75 72 72 65 | 6e 74 20 6b 65 79 2e 0a |he curre|nt key..|
|00000730| 49 6e 64 69 63 65 73 20 | 69 73 20 61 20 6c 69 73 |Indices |is a lis|
|00000740| 74 20 6f 66 20 28 43 55 | 52 52 45 4e 54 20 53 54 |t of (CU|RRENT ST|
|00000750| 41 52 54 20 45 4e 44 20 | 42 4c 4f 43 4b 20 42 4c |ART END |BLOCK BL|
|00000760| 4f 43 4b 53 29 2c 20 77 | 68 65 72 65 0a 43 55 52 |OCKS), w|here.CUR|
|00000770| 52 45 4e 54 20 69 73 20 | 61 6e 20 69 6e 64 65 78 |RENT is |an index|
|00000780| 20 6f 66 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | of the |current |
|00000790| 74 72 61 6e 73 6c 61 74 | 69 6f 6e 2c 0a 53 54 41 |translat|ion,.STA|
|000007a0| 52 54 20 61 6e 64 20 45 | 4e 44 20 61 72 65 20 69 |RT and E|ND are i|
|000007b0| 6e 64 69 63 65 73 20 6f | 66 20 74 68 65 20 73 74 |ndices o|f the st|
|000007c0| 61 72 74 20 61 6e 64 20 | 65 6e 64 20 6f 66 20 74 |art and |end of t|
|000007d0| 68 65 20 63 75 72 72 65 | 6e 74 20 62 6c 6f 63 6b |he curre|nt block|
|000007e0| 2c 0a 42 4c 4f 43 4b 20 | 69 73 20 74 68 65 20 63 |,.BLOCK |is the c|
|000007f0| 75 72 72 65 6e 74 20 62 | 6c 6f 63 6b 20 69 6e 64 |urrent b|lock ind|
|00000800| 65 78 2c 0a 42 4c 4f 43 | 4b 53 20 69 73 20 61 20 |ex,.BLOC|KS is a |
|00000810| 6e 75 6d 62 65 72 20 6f | 66 20 20 62 6c 6f 63 6b |number o|f  block|
|00000820| 73 20 6f 66 20 74 72 61 | 6e 73 6c 61 74 69 6f 6e |s of tra|nslation|
|00000830| 2e 1f 0a 28 64 65 66 76 | 61 72 20 71 75 61 69 6c |...(defv|ar quail|
|00000840| 2d 63 75 72 72 65 6e 74 | 2d 74 72 61 6e 73 6c 61 |-current|-transla|
|00000850| 74 69 6f 6e 73 20 6e 69 | 6c 20 28 23 24 20 2e 20 |tions ni|l (#$ . |
|00000860| 31 37 36 38 29 29 0a 23 | 40 32 36 37 20 41 6e 79 |1768)).#|@267 Any|
|00000870| 20 4c 69 73 70 20 6f 62 | 6a 65 63 74 20 68 6f 6c | Lisp ob|ject hol|
|00000880| 64 69 6e 67 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |ding inf|ormation|
|00000890| 20 6f 66 20 63 75 72 72 | 65 6e 74 20 74 72 61 6e | of curr|ent tran|
|000008a0| 73 6c 61 74 69 6f 6e 20 | 73 74 61 74 75 73 2e 0a |slation |status..|
|000008b0| 57 68 65 6e 20 61 20 6b | 65 79 20 73 65 71 75 65 |When a k|ey seque|
|000008c0| 6e 63 65 20 69 73 20 6d | 61 70 70 65 64 20 74 6f |nce is m|apped to|
|000008d0| 20 54 52 41 4e 53 20 61 | 6e 64 20 54 52 41 4e 53 | TRANS a|nd TRANS|
|000008e0| 20 69 73 20 61 20 63 6f | 6e 73 0a 6f 66 20 61 63 | is a co|ns.of ac|
|000008f0| 74 75 61 6c 20 74 72 61 | 6e 73 6c 61 74 69 6f 6e |tual tra|nslation|
|00000900| 20 61 6e 64 20 73 6f 6d | 65 20 4c 69 73 70 20 6f | and som|e Lisp o|
|00000910| 62 6a 65 63 74 20 74 6f | 20 62 65 20 72 65 66 65 |bject to| be refe|
|00000920| 72 65 64 0a 66 6f 72 20 | 74 72 61 6e 73 6c 61 74 |red.for |translat|
|00000930| 69 6e 67 20 74 68 65 20 | 6c 6f 6e 67 65 72 20 6b |ing the |longer k|
|00000940| 65 79 20 73 65 71 75 65 | 6e 63 65 2c 20 74 68 69 |ey seque|nce, thi|
|00000950| 73 20 76 61 72 69 61 62 | 6c 65 20 69 73 20 73 65 |s variab|le is se|
|00000960| 74 0a 74 6f 20 74 68 61 | 74 20 4c 69 73 70 20 6f |t.to tha|t Lisp o|
|00000970| 62 6a 65 63 74 2e 1f 0a | 28 64 65 66 76 61 72 20 |bject...|(defvar |
|00000980| 71 75 61 69 6c 2d 63 75 | 72 72 65 6e 74 2d 64 61 |quail-cu|rrent-da|
|00000990| 74 61 20 6e 69 6c 20 28 | 23 24 20 2e 20 32 31 35 |ta nil (|#$ . 215|
|000009a0| 37 29 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |7)).(byt|e-code "|
|000009b0| c0 c1 21 88 c2 c3 21 ac | 82 c4 13 c3 0d 42 15 c4 |..!...!.|.....B..|
|000009c0| 87 22 20 5b 6d 61 6b 65 | 2d 76 61 72 69 61 62 6c |." [make|-variabl|
|000009d0| 65 2d 62 75 66 66 65 72 | 2d 6c 6f 63 61 6c 20 71 |e-buffer|-local q|
|000009e0| 75 61 69 6c 2d 63 75 72 | 72 65 6e 74 2d 64 61 74 |uail-cur|rent-dat|
|000009f0| 61 20 62 6f 75 6e 64 70 | 20 71 75 61 69 6c 2d 72 |a boundp| quail-r|
|00000a00| 65 73 65 74 2d 63 6f 6e | 76 65 72 73 69 6f 6e 2d |eset-con|version-|
|00000a10| 72 65 67 69 6f 6e 20 6e | 69 6c 20 63 75 72 72 65 |region n|il curre|
|00000a20| 6e 74 2d 6c 6f 61 64 2d | 6c 69 73 74 5d 20 32 29 |nt-load-|list] 2)|
|00000a30| 0a 23 40 35 36 37 20 4c | 69 73 74 20 6f 66 20 51 |.#@567 L|ist of Q|
|00000a40| 75 61 69 6c 20 70 61 63 | 6b 61 67 65 73 2e 0a 41 |uail pac|kages..A|
|00000a50| 20 51 75 61 69 6c 20 70 | 61 63 6b 61 67 65 20 69 | Quail p|ackage i|
|00000a60| 73 20 61 20 6c 69 73 74 | 20 6f 66 20 74 68 65 73 |s a list| of thes|
|00000a70| 65 20 65 6c 65 6d 65 6e | 74 73 3a 0a 20 20 4e 41 |e elemen|ts:.  NA|
|00000a80| 4d 45 2c 20 54 49 54 4c | 45 2c 20 51 55 41 49 4c |ME, TITL|E, QUAIL|
|00000a90| 2d 4d 41 50 2c 20 47 55 | 49 44 41 4e 43 45 2c 20 |-MAP, GU|IDANCE, |
|00000aa0| 44 4f 43 53 54 52 49 4e | 47 2c 20 54 52 41 4e 53 |DOCSTRIN|G, TRANS|
|00000ab0| 4c 41 54 49 4f 4e 2d 4b | 45 59 53 2c 0a 20 20 46 |LATION-K|EYS,.  F|
|00000ac0| 4f 52 47 45 54 2d 4c 41 | 53 54 2d 53 45 4c 45 43 |ORGET-LA|ST-SELEC|
|00000ad0| 54 49 4f 4e 2c 20 44 45 | 54 45 52 4d 49 4e 49 53 |TION, DE|TERMINIS|
|00000ae0| 54 49 43 2c 20 4b 42 44 | 2d 54 52 41 4e 53 4c 41 |TIC, KBD|-TRANSLA|
|00000af0| 54 45 2c 20 53 48 4f 57 | 2d 4c 41 59 4f 55 54 2c |TE, SHOW|-LAYOUT,|
|00000b00| 0a 20 20 44 45 43 4f 44 | 45 2d 4d 41 50 2c 20 4d |.  DECOD|E-MAP, M|
|00000b10| 41 58 49 4d 55 4d 2d 53 | 48 4f 52 54 45 53 54 2c |AXIMUM-S|HORTEST,|
|00000b20| 20 4f 56 45 52 4c 41 59 | 2d 50 4c 49 53 54 2c 20 | OVERLAY|-PLIST, |
|00000b30| 55 50 44 41 54 45 2d 54 | 52 41 4e 53 4c 41 54 49 |UPDATE-T|RANSLATI|
|00000b40| 4f 4e 2d 46 55 4e 43 54 | 49 4f 4e 2c 0a 20 20 43 |ON-FUNCT|ION,.  C|
|00000b50| 4f 4e 56 45 52 53 49 4f | 4e 2d 4b 45 59 53 2c 20 |ONVERSIO|N-KEYS, |
|00000b60| 53 49 4d 50 4c 45 2e 0a | 0a 51 55 41 49 4c 2d 4d |SIMPLE..|.QUAIL-M|
|00000b70| 41 50 20 69 73 20 61 20 | 64 61 74 61 20 73 74 72 |AP is a |data str|
|00000b80| 75 63 74 75 72 65 20 74 | 6f 20 6d 61 70 20 6b 65 |ucture t|o map ke|
|00000b90| 79 20 73 74 72 69 6e 67 | 73 20 74 6f 20 74 72 61 |y string|s to tra|
|00000ba0| 6e 73 6c 61 74 69 6f 6e | 73 2e 20 20 46 6f 72 0a |nslation|s.  For.|
|00000bb0| 74 68 65 20 66 6f 72 6d | 61 74 2c 20 73 65 65 20 |the form|at, see |
|00000bc0| 74 68 65 20 64 6f 63 75 | 6d 65 6e 74 61 74 69 6f |the docu|mentatio|
|00000bd0| 6e 20 6f 66 20 60 71 75 | 61 69 6c 2d 6d 61 70 2d |n of `qu|ail-map-|
|00000be0| 70 27 2e 0a 0a 44 45 43 | 4f 44 45 2d 4d 41 50 20 |p'...DEC|ODE-MAP |
|00000bf0| 69 73 20 61 6e 20 61 6c | 69 73 74 20 6f 66 20 74 |is an al|ist of t|
|00000c00| 72 61 6e 73 6c 61 74 69 | 6f 6e 73 20 61 6e 64 20 |ranslati|ons and |
|00000c10| 63 6f 72 72 65 73 70 6f | 6e 64 69 6e 67 20 6b 65 |correspo|nding ke|
|00000c20| 79 73 2e 0a 0a 53 65 65 | 20 74 68 65 20 64 6f 63 |ys...See| the doc|
|00000c30| 75 6d 65 6e 74 61 74 69 | 6f 6e 20 6f 66 20 60 71 |umentati|on of `q|
|00000c40| 75 61 69 6c 2d 64 65 66 | 69 6e 65 2d 70 61 63 6b |uail-def|ine-pack|
|00000c50| 61 67 65 27 20 66 6f 72 | 20 74 68 65 20 6f 74 68 |age' for| the oth|
|00000c60| 65 72 20 65 6c 65 6d 65 | 6e 74 73 2e 1f 0a 28 64 |er eleme|nts...(d|
|00000c70| 65 66 76 61 72 20 71 75 | 61 69 6c 2d 70 61 63 6b |efvar qu|ail-pack|
|00000c80| 61 67 65 2d 61 6c 69 73 | 74 20 6e 69 6c 20 28 23 |age-alis|t nil (#|
|00000c90| 24 20 2e 20 32 36 31 35 | 29 29 0a 23 40 34 37 20 |$ . 2615|)).#@47 |
|00000ca0| 52 65 74 75 72 6e 20 74 | 68 65 20 6e 61 6d 65 20 |Return t|he name |
|00000cb0| 6f 66 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 51 |of the c|urrent Q|
|00000cc0| 75 61 69 6c 20 70 61 63 | 6b 61 67 65 2e 1f 0a 28 |uail pac|kage...(|
|00000cd0| 64 65 66 61 6c 69 61 73 | 20 27 71 75 61 69 6c 2d |defalias| 'quail-|
|00000ce0| 6e 61 6d 65 20 23 5b 6e | 69 6c 20 22 08 40 87 22 |name #[n|il ".@."|
|00000cf0| 20 5b 71 75 61 69 6c 2d | 63 75 72 72 65 6e 74 2d | [quail-|current-|
|00000d00| 70 61 63 6b 61 67 65 5d | 20 31 20 28 23 24 20 2e |package]| 1 (#$ .|
|00000d10| 20 33 32 33 32 29 5d 29 | 0a 28 62 79 74 65 2d 63 | 3232)])|.(byte-c|
|00000d20| 6f 64 65 20 22 c0 c1 4e | c2 73 ac 85 c3 c4 c0 5c |ode "..N|.s.....\|
|00000d30| 22 88 c5 c0 c1 c6 23 87 | 22 20 5b 71 75 61 69 6c |".....#.|" [quail|
|00000d40| 2d 6e 61 6d 65 20 62 79 | 74 65 2d 6f 70 74 69 6d |-name by|te-optim|
|00000d50| 69 7a 65 72 20 28 6e 69 | 6c 20 62 79 74 65 2d 63 |izer (ni|l byte-c|
|00000d60| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00000d70| 70 61 6e 64 29 20 65 72 | 72 6f 72 20 22 25 73 20 |pand) er|ror "%s |
|00000d80| 61 6c 72 65 61 64 79 20 | 68 61 73 20 61 20 62 79 |already |has a by|
|00000d90| 74 65 2d 6f 70 74 69 6d | 69 7a 65 72 2c 20 63 61 |te-optim|izer, ca|
|00000da0| 6e 27 74 20 6d 61 6b 65 | 20 69 74 20 69 6e 6c 69 |n't make| it inli|
|00000db0| 6e 65 22 20 70 75 74 20 | 62 79 74 65 2d 63 6f 6d |ne" put |byte-com|
|00000dc0| 70 69 6c 65 2d 69 6e 6c | 69 6e 65 2d 65 78 70 61 |pile-inl|ine-expa|
|00000dd0| 6e 64 5d 20 34 29 0a 23 | 40 34 38 20 52 65 74 75 |nd] 4).#|@48 Retu|
|00000de0| 72 6e 20 74 68 65 20 74 | 69 74 6c 65 20 6f 66 20 |rn the t|itle of |
|00000df0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 51 75 61 69 |the curr|ent Quai|
|00000e00| 6c 20 70 61 63 6b 61 67 | 65 2e 1f 0a 28 64 65 66 |l packag|e...(def|
|00000e10| 61 6c 69 61 73 20 27 71 | 75 61 69 6c 2d 74 69 74 |alias 'q|uail-tit|
|00000e20| 6c 65 20 23 5b 6e 69 6c | 20 22 08 41 40 87 22 20 |le #[nil| ".A@." |
|00000e30| 5b 71 75 61 69 6c 2d 63 | 75 72 72 65 6e 74 2d 70 |[quail-c|urrent-p|
|00000e40| 61 63 6b 61 67 65 5d 20 | 31 20 28 23 24 20 2e 20 |ackage] |1 (#$ . |
|00000e50| 33 35 34 38 29 5d 29 0a | 28 62 79 74 65 2d 63 6f |3548)]).|(byte-co|
|00000e60| 64 65 20 22 c0 c1 4e c2 | 73 ac 85 c3 c4 c0 5c 22 |de "..N.|s.....\"|
|00000e70| 88 c5 c0 c1 c6 23 87 22 | 20 5b 71 75 61 69 6c 2d |.....#."| [quail-|
|00000e80| 74 69 74 6c 65 20 62 79 | 74 65 2d 6f 70 74 69 6d |title by|te-optim|
|00000e90| 69 7a 65 72 20 28 6e 69 | 6c 20 62 79 74 65 2d 63 |izer (ni|l byte-c|
|00000ea0| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00000eb0| 70 61 6e 64 29 20 65 72 | 72 6f 72 20 22 25 73 20 |pand) er|ror "%s |
|00000ec0| 61 6c 72 65 61 64 79 20 | 68 61 73 20 61 20 62 79 |already |has a by|
|00000ed0| 74 65 2d 6f 70 74 69 6d | 69 7a 65 72 2c 20 63 61 |te-optim|izer, ca|
|00000ee0| 6e 27 74 20 6d 61 6b 65 | 20 69 74 20 69 6e 6c 69 |n't make| it inli|
|00000ef0| 6e 65 22 20 70 75 74 20 | 62 79 74 65 2d 63 6f 6d |ne" put |byte-com|
|00000f00| 70 69 6c 65 2d 69 6e 6c | 69 6e 65 2d 65 78 70 61 |pile-inl|ine-expa|
|00000f10| 6e 64 5d 20 34 29 0a 23 | 40 35 38 20 52 65 74 75 |nd] 4).#|@58 Retu|
|00000f20| 72 6e 20 74 68 65 20 74 | 72 61 6e 73 6c 61 74 69 |rn the t|ranslati|
|00000f30| 6f 6e 20 6d 61 70 20 6f | 66 20 74 68 65 20 63 75 |on map o|f the cu|
|00000f40| 72 72 65 6e 74 20 51 75 | 61 69 6c 20 70 61 63 6b |rrent Qu|ail pack|
|00000f50| 61 67 65 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |age...(d|efalias |
|00000f60| 27 71 75 61 69 6c 2d 6d | 61 70 20 23 5b 6e 69 6c |'quail-m|ap #[nil|
|00000f70| 20 22 c0 09 38 87 22 20 | 5b 32 20 71 75 61 69 6c | "..8." |[2 quail|
|00000f80| 2d 63 75 72 72 65 6e 74 | 2d 70 61 63 6b 61 67 65 |-current|-package|
|00000f90| 5d 20 32 20 28 23 24 20 | 2e 20 33 38 36 38 29 5d |] 2 (#$ |. 3868)]|
|00000fa0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|00000fb0| 4e c2 73 ac 85 c3 c4 c0 | 5c 22 88 c5 c0 c1 c6 23 |N.s.....|\".....#|
|00000fc0| 87 22 20 5b 71 75 61 69 | 6c 2d 6d 61 70 20 62 79 |." [quai|l-map by|
|00000fd0| 74 65 2d 6f 70 74 69 6d | 69 7a 65 72 20 28 6e 69 |te-optim|izer (ni|
|00000fe0| 6c 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 69 |l byte-c|ompile-i|
|00000ff0| 6e 6c 69 6e 65 2d 65 78 | 70 61 6e 64 29 20 65 72 |nline-ex|pand) er|
|00001000| 72 6f 72 20 22 25 73 20 | 61 6c 72 65 61 64 79 20 |ror "%s |already |
|00001010| 68 61 73 20 61 20 62 79 | 74 65 2d 6f 70 74 69 6d |has a by|te-optim|
|00001020| 69 7a 65 72 2c 20 63 61 | 6e 27 74 20 6d 61 6b 65 |izer, ca|n't make|
|00001030| 20 69 74 20 69 6e 6c 69 | 6e 65 22 20 70 75 74 20 | it inli|ne" put |
|00001040| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 69 6e 6c |byte-com|pile-inl|
|00001050| 69 6e 65 2d 65 78 70 61 | 6e 64 5d 20 34 29 0a 23 |ine-expa|nd] 4).#|
|00001060| 40 31 33 30 20 52 65 74 | 75 72 6e 20 61 6e 20 6f |@130 Ret|urn an o|
|00001070| 62 6a 65 63 74 20 75 73 | 65 64 20 66 6f 72 20 60 |bject us|ed for `|
|00001080| 67 75 69 64 61 6e 63 65 | 27 20 66 65 61 74 75 72 |guidance|' featur|
|00001090| 65 20 6f 66 20 74 68 65 | 20 63 75 72 72 65 6e 74 |e of the| current|
|000010a0| 20 51 75 61 69 6c 20 70 | 61 63 6b 61 67 65 2e 0a | Quail p|ackage..|
|000010b0| 53 65 65 20 61 6c 73 6f | 20 74 68 65 20 64 6f 63 |See also| the doc|
|000010c0| 75 6d 65 6e 74 61 74 69 | 6f 6e 20 6f 66 20 60 71 |umentati|on of `q|
|000010d0| 75 61 69 6c 2d 64 65 66 | 69 6e 65 2d 70 61 63 6b |uail-def|ine-pack|
|000010e0| 61 67 65 27 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |age'...(|defalias|
|000010f0| 20 27 71 75 61 69 6c 2d | 67 75 69 64 61 6e 63 65 | 'quail-|guidance|
|00001100| 20 23 5b 6e 69 6c 20 22 | c0 09 38 87 22 20 5b 33 | #[nil "|..8." [3|
|00001110| 20 71 75 61 69 6c 2d 63 | 75 72 72 65 6e 74 2d 70 | quail-c|urrent-p|
|00001120| 61 63 6b 61 67 65 5d 20 | 32 20 28 23 24 20 2e 20 |ackage] |2 (#$ . |
|00001130| 34 31 39 37 29 5d 29 0a | 28 62 79 74 65 2d 63 6f |4197)]).|(byte-co|
|00001140| 64 65 20 22 c0 c1 4e c2 | 73 ac 85 c3 c4 c0 5c 22 |de "..N.|s.....\"|
|00001150| 88 c5 c0 c1 c6 23 87 22 | 20 5b 71 75 61 69 6c 2d |.....#."| [quail-|
|00001160| 67 75 69 64 61 6e 63 65 | 20 62 79 74 65 2d 6f 70 |guidance| byte-op|
|00001170| 74 69 6d 69 7a 65 72 20 | 28 6e 69 6c 20 62 79 74 |timizer |(nil byt|
|00001180| 65 2d 63 6f 6d 70 69 6c | 65 2d 69 6e 6c 69 6e 65 |e-compil|e-inline|
|00001190| 2d 65 78 70 61 6e 64 29 | 20 65 72 72 6f 72 20 22 |-expand)| error "|
|000011a0| 25 73 20 61 6c 72 65 61 | 64 79 20 68 61 73 20 61 |%s alrea|dy has a|
|000011b0| 20 62 79 74 65 2d 6f 70 | 74 69 6d 69 7a 65 72 2c | byte-op|timizer,|
|000011c0| 20 63 61 6e 27 74 20 6d | 61 6b 65 20 69 74 20 69 | can't m|ake it i|
|000011d0| 6e 6c 69 6e 65 22 20 70 | 75 74 20 62 79 74 65 2d |nline" p|ut byte-|
|000011e0| 63 6f 6d 70 69 6c 65 2d | 69 6e 6c 69 6e 65 2d 65 |compile-|inline-e|
|000011f0| 78 70 61 6e 64 5d 20 34 | 29 0a 23 40 36 33 20 52 |xpand] 4|).#@63 R|
|00001200| 65 74 75 72 6e 20 74 68 | 65 20 64 6f 63 75 6d 65 |eturn th|e docume|
|00001210| 6e 74 61 74 69 6f 6e 20 | 73 74 72 69 6e 67 20 6f |ntation |string o|
|00001220| 66 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 51 75 |f the cu|rrent Qu|
|00001230| 61 69 6c 20 70 61 63 6b | 61 67 65 2e 1f 0a 28 64 |ail pack|age...(d|
|00001240| 65 66 61 6c 69 61 73 20 | 27 71 75 61 69 6c 2d 64 |efalias |'quail-d|
|00001250| 6f 63 73 74 72 69 6e 67 | 20 23 5b 6e 69 6c 20 22 |ocstring| #[nil "|
|00001260| c0 09 38 87 22 20 5b 34 | 20 71 75 61 69 6c 2d 63 |..8." [4| quail-c|
|00001270| 75 72 72 65 6e 74 2d 70 | 61 63 6b 61 67 65 5d 20 |urrent-p|ackage] |
|00001280| 32 20 28 23 24 20 2e 20 | 34 36 30 37 29 5d 29 0a |2 (#$ . |4607)]).|
|00001290| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 4e c2 |(byte-co|de "..N.|
|000012a0| 73 ac 85 c3 c4 c0 5c 22 | 88 c5 c0 c1 c6 23 87 22 |s.....\"|.....#."|
|000012b0| 20 5b 71 75 61 69 6c 2d | 64 6f 63 73 74 72 69 6e | [quail-|docstrin|
|000012c0| 67 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 72 |g byte-o|ptimizer|
|000012d0| 20 28 6e 69 6c 20 62 79 | 74 65 2d 63 6f 6d 70 69 | (nil by|te-compi|
|000012e0| 6c 65 2d 69 6e 6c 69 6e | 65 2d 65 78 70 61 6e 64 |le-inlin|e-expand|
|000012f0| 29 20 65 72 72 6f 72 20 | 22 25 73 20 61 6c 72 65 |) error |"%s alre|
|00001300| 61 64 79 20 68 61 73 20 | 61 20 62 79 74 65 2d 6f |ady has |a byte-o|
|00001310| 70 74 69 6d 69 7a 65 72 | 2c 20 63 61 6e 27 74 20 |ptimizer|, can't |
|00001320| 6d 61 6b 65 20 69 74 20 | 69 6e 6c 69 6e 65 22 20 |make it |inline" |
|00001330| 70 75 74 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |put byte|-compile|
|00001340| 2d 69 6e 6c 69 6e 65 2d | 65 78 70 61 6e 64 5d 20 |-inline-|expand] |
|00001350| 34 29 0a 23 40 31 32 39 | 20 52 65 74 75 72 6e 20 |4).#@129| Return |
|00001360| 74 72 61 6e 73 6c 61 74 | 69 6f 6e 20 6b 65 79 6d |translat|ion keym|
|00001370| 61 70 20 69 6e 20 74 68 | 65 20 63 75 72 72 65 6e |ap in th|e curren|
|00001380| 74 20 51 75 61 69 6c 20 | 70 61 63 6b 61 67 65 2e |t Quail |package.|
|00001390| 0a 54 72 61 6e 73 6c 61 | 74 69 6f 6e 20 6b 65 79 |.Transla|tion key|
|000013a0| 6d 61 70 20 69 73 20 61 | 20 6b 65 79 6d 61 70 20 |map is a| keymap |
|000013b0| 75 73 65 64 20 77 68 69 | 6c 65 20 74 72 61 6e 73 |used whi|le trans|
|000013c0| 6c 61 74 69 6f 6e 20 72 | 65 67 69 6f 6e 20 69 73 |lation r|egion is|
|000013d0| 20 61 63 74 69 76 65 2e | 1f 0a 28 64 65 66 61 6c | active.|..(defal|
|000013e0| 69 61 73 20 27 71 75 61 | 69 6c 2d 74 72 61 6e 73 |ias 'qua|il-trans|
|000013f0| 6c 61 74 69 6f 6e 2d 6b | 65 79 6d 61 70 20 23 5b |lation-k|eymap #[|
|00001400| 6e 69 6c 20 22 c0 09 38 | 87 22 20 5b 35 20 71 75 |nil "..8|." [5 qu|
|00001410| 61 69 6c 2d 63 75 72 72 | 65 6e 74 2d 70 61 63 6b |ail-curr|ent-pack|
|00001420| 61 67 65 5d 20 32 20 28 | 23 24 20 2e 20 34 39 35 |age] 2 (|#$ . 495|
|00001430| 33 29 5d 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |3)]).(by|te-code |
|00001440| 22 c0 c1 4e c2 73 ac 85 | c3 c4 c0 5c 22 88 c5 c0 |"..N.s..|...\"...|
|00001450| c1 c6 23 87 22 20 5b 71 | 75 61 69 6c 2d 74 72 61 |..#." [q|uail-tra|
|00001460| 6e 73 6c 61 74 69 6f 6e | 2d 6b 65 79 6d 61 70 20 |nslation|-keymap |
|00001470| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 72 20 28 |byte-opt|imizer (|
|00001480| 6e 69 6c 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |nil byte|-compile|
|00001490| 2d 69 6e 6c 69 6e 65 2d | 65 78 70 61 6e 64 29 20 |-inline-|expand) |
|000014a0| 65 72 72 6f 72 20 22 25 | 73 20 61 6c 72 65 61 64 |error "%|s alread|
|000014b0| 79 20 68 61 73 20 61 20 | 62 79 74 65 2d 6f 70 74 |y has a |byte-opt|
|000014c0| 69 6d 69 7a 65 72 2c 20 | 63 61 6e 27 74 20 6d 61 |imizer, |can't ma|
|000014d0| 6b 65 20 69 74 20 69 6e | 6c 69 6e 65 22 20 70 75 |ke it in|line" pu|
|000014e0| 74 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 69 |t byte-c|ompile-i|
|000014f0| 6e 6c 69 6e 65 2d 65 78 | 70 61 6e 64 5d 20 34 29 |nline-ex|pand] 4)|
|00001500| 0a 23 40 31 32 31 20 52 | 65 74 75 72 6e 20 60 66 |.#@121 R|eturn `f|
|00001510| 6f 72 67 65 74 2d 6c 61 | 73 74 2d 73 65 6c 65 63 |orget-la|st-selec|
|00001520| 74 69 6f 6e 27 20 66 6c | 61 67 20 6f 66 20 74 68 |tion' fl|ag of th|
|00001530| 65 20 63 75 72 72 65 6e | 74 20 51 75 61 69 6c 20 |e curren|t Quail |
|00001540| 70 61 63 6b 61 67 65 2e | 0a 53 65 65 20 61 6c 73 |package.|.See als|
|00001550| 6f 20 74 68 65 20 64 6f | 63 75 6d 65 6e 74 61 74 |o the do|cumentat|
|00001560| 69 6f 6e 20 6f 66 20 60 | 71 75 61 69 6c 2d 64 65 |ion of `|quail-de|
|00001570| 66 69 6e 65 2d 70 61 63 | 6b 61 67 65 27 2e 1f 0a |fine-pac|kage'...|
|00001580| 28 64 65 66 61 6c 69 61 | 73 20 27 71 75 61 69 6c |(defalia|s 'quail|
|00001590| 2d 66 6f 72 67 65 74 2d | 6c 61 73 74 2d 73 65 6c |-forget-|last-sel|
|000015a0| 65 63 74 69 6f 6e 20 23 | 5b 6e 69 6c 20 22 c0 09 |ection #|[nil "..|
|000015b0| 38 87 22 20 5b 36 20 71 | 75 61 69 6c 2d 63 75 72 |8." [6 q|uail-cur|
|000015c0| 72 65 6e 74 2d 70 61 63 | 6b 61 67 65 5d 20 32 20 |rent-pac|kage] 2 |
|000015d0| 28 23 24 20 2e 20 35 33 | 38 33 29 5d 29 0a 28 62 |(#$ . 53|83)]).(b|
|000015e0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 4e c2 73 ac |yte-code| "..N.s.|
|000015f0| 85 c3 c4 c0 5c 22 88 c5 | c0 c1 c6 23 87 22 20 5b |....\"..|...#." [|
|00001600| 71 75 61 69 6c 2d 66 6f | 72 67 65 74 2d 6c 61 73 |quail-fo|rget-las|
|00001610| 74 2d 73 65 6c 65 63 74 | 69 6f 6e 20 62 79 74 65 |t-select|ion byte|
|00001620| 2d 6f 70 74 69 6d 69 7a | 65 72 20 28 6e 69 6c 20 |-optimiz|er (nil |
|00001630| 62 79 74 65 2d 63 6f 6d | 70 69 6c 65 2d 69 6e 6c |byte-com|pile-inl|
|00001640| 69 6e 65 2d 65 78 70 61 | 6e 64 29 20 65 72 72 6f |ine-expa|nd) erro|
|00001650| 72 20 22 25 73 20 61 6c | 72 65 61 64 79 20 68 61 |r "%s al|ready ha|
|00001660| 73 20 61 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a |s a byte|-optimiz|
|00001670| 65 72 2c 20 63 61 6e 27 | 74 20 6d 61 6b 65 20 69 |er, can'|t make i|
|00001680| 74 20 69 6e 6c 69 6e 65 | 22 20 70 75 74 20 62 79 |t inline|" put by|
|00001690| 74 65 2d 63 6f 6d 70 69 | 6c 65 2d 69 6e 6c 69 6e |te-compi|le-inlin|
|000016a0| 65 2d 65 78 70 61 6e 64 | 5d 20 34 29 0a 23 40 31 |e-expand|] 4).#@1|
|000016b0| 31 33 20 52 65 74 75 72 | 6e 20 60 64 65 74 65 72 |13 Retur|n `deter|
|000016c0| 6d 69 6e 69 73 74 69 63 | 27 20 66 6c 61 67 20 6f |ministic|' flag o|
|000016d0| 66 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 51 75 |f the cu|rrent Qu|
|000016e0| 61 69 6c 20 70 61 63 6b | 61 67 65 2e 0a 53 65 65 |ail pack|age..See|
|000016f0| 20 61 6c 73 6f 20 74 68 | 65 20 64 6f 63 75 6d 65 | also th|e docume|
|00001700| 6e 74 61 74 69 6f 6e 20 | 6f 66 20 60 71 75 61 69 |ntation |of `quai|
|00001710| 6c 2d 64 65 66 69 6e 65 | 2d 70 61 63 6b 61 67 65 |l-define|-package|
|00001720| 27 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 71 |'...(def|alias 'q|
|00001730| 75 61 69 6c 2d 64 65 74 | 65 72 6d 69 6e 69 73 74 |uail-det|erminist|
|00001740| 69 63 20 23 5b 6e 69 6c | 20 22 c0 09 38 87 22 20 |ic #[nil| "..8." |
|00001750| 5b 37 20 71 75 61 69 6c | 2d 63 75 72 72 65 6e 74 |[7 quail|-current|
|00001760| 2d 70 61 63 6b 61 67 65 | 5d 20 32 20 28 23 24 20 |-package|] 2 (#$ |
|00001770| 2e 20 35 38 31 31 29 5d | 29 0a 28 62 79 74 65 2d |. 5811)]|).(byte-|
|00001780| 63 6f 64 65 20 22 c0 c1 | 4e c2 73 ac 85 c3 c4 c0 |code "..|N.s.....|
|00001790| 5c 22 88 c5 c0 c1 c6 23 | 87 22 20 5b 71 75 61 69 |\".....#|." [quai|
|000017a0| 6c 2d 64 65 74 65 72 6d | 69 6e 69 73 74 69 63 20 |l-determ|inistic |
|000017b0| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 72 20 28 |byte-opt|imizer (|
|000017c0| 6e 69 6c 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |nil byte|-compile|
|000017d0| 2d 69 6e 6c 69 6e 65 2d | 65 78 70 61 6e 64 29 20 |-inline-|expand) |
|000017e0| 65 72 72 6f 72 20 22 25 | 73 20 61 6c 72 65 61 64 |error "%|s alread|
|000017f0| 79 20 68 61 73 20 61 20 | 62 79 74 65 2d 6f 70 74 |y has a |byte-opt|
|00001800| 69 6d 69 7a 65 72 2c 20 | 63 61 6e 27 74 20 6d 61 |imizer, |can't ma|
|00001810| 6b 65 20 69 74 20 69 6e | 6c 69 6e 65 22 20 70 75 |ke it in|line" pu|
|00001820| 74 20 62 79 74 65 2d 63 | 6f 6d 70 69 6c 65 2d 69 |t byte-c|ompile-i|
|00001830| 6e 6c 69 6e 65 2d 65 78 | 70 61 6e 64 5d 20 34 29 |nline-ex|pand] 4)|
|00001840| 0a 23 40 31 31 33 20 52 | 65 74 75 72 6e 20 60 6b |.#@113 R|eturn `k|
|00001850| 62 64 2d 74 72 61 6e 73 | 6c 61 74 65 27 20 66 6c |bd-trans|late' fl|
|00001860| 61 67 20 6f 66 20 74 68 | 65 20 63 75 72 72 65 6e |ag of th|e curren|
|00001870| 74 20 51 75 61 69 6c 20 | 70 61 63 6b 61 67 65 2e |t Quail |package.|
|00001880| 0a 53 65 65 20 61 6c 73 | 6f 20 74 68 65 20 64 6f |.See als|o the do|
|00001890| 63 75 6d 65 6e 74 61 74 | 69 6f 6e 20 6f 66 20 60 |cumentat|ion of `|
|000018a0| 71 75 61 69 6c 2d 64 65 | 66 69 6e 65 2d 70 61 63 |quail-de|fine-pac|
|000018b0| 6b 61 67 65 27 2e 1f 0a | 28 64 65 66 61 6c 69 61 |kage'...|(defalia|
|000018c0| 73 20 27 71 75 61 69 6c | 2d 6b 62 64 2d 74 72 61 |s 'quail|-kbd-tra|
|000018d0| 6e 73 6c 61 74 65 20 23 | 5b 6e 69 6c 20 22 c0 09 |nslate #|[nil "..|
|000018e0| 38 87 22 20 5b 38 20 71 | 75 61 69 6c 2d 63 75 72 |8." [8 q|uail-cur|
|000018f0| 72 65 6e 74 2d 70 61 63 | 6b 61 67 65 5d 20 32 20 |rent-pac|kage] 2 |
|00001900| 28 23 24 20 2e 20 36 32 | 31 35 29 5d 29 0a 28 62 |(#$ . 62|15)]).(b|
|00001910| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 4e c2 73 ac |yte-code| "..N.s.|
|00001920| 85 c3 c4 c0 5c 22 88 c5 | c0 c1 c6 23 87 22 20 5b |....\"..|...#." [|
|00001930| 71 75 61 69 6c 2d 6b 62 | 64 2d 74 72 61 6e 73 6c |quail-kb|d-transl|
|00001940| 61 74 65 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a |ate byte|-optimiz|
|00001950| 65 72 20 28 6e 69 6c 20 | 62 79 74 65 2d 63 6f 6d |er (nil |byte-com|
|00001960| 70 69 6c 65 2d 69 6e 6c | 69 6e 65 2d 65 78 70 61 |pile-inl|ine-expa|
|00001970| 6e 64 29 20 65 72 72 6f | 72 20 22 25 73 20 61 6c |nd) erro|r "%s al|
|00001980| 72 65 61 64 79 20 68 61 | 73 20 61 20 62 79 74 65 |ready ha|s a byte|
|00001990| 2d 6f 70 74 69 6d 69 7a | 65 72 2c 20 63 61 6e 27 |-optimiz|er, can'|
|000019a0| 74 20 6d 61 6b 65 20 69 | 74 20 69 6e 6c 69 6e 65 |t make i|t inline|
|000019b0| 22 20 70 75 74 20 62 79 | 74 65 2d 63 6f 6d 70 69 |" put by|te-compi|
|000019c0| 6c 65 2d 69 6e 6c 69 6e | 65 2d 65 78 70 61 6e 64 |le-inlin|e-expand|
|000019d0| 5d 20 34 29 0a 23 40 31 | 31 31 20 52 65 74 75 72 |] 4).#@1|11 Retur|
|000019e0| 6e 20 60 73 68 6f 77 2d | 6c 61 79 6f 75 74 27 20 |n `show-|layout' |
|000019f0| 66 6c 61 67 20 6f 66 20 | 74 68 65 20 63 75 72 72 |flag of |the curr|
|00001a00| 65 6e 74 20 51 75 61 69 | 6c 20 70 61 63 6b 61 67 |ent Quai|l packag|
|00001a10| 65 2e 0a 53 65 65 20 61 | 6c 73 6f 20 74 68 65 20 |e..See a|lso the |
|00001a20| 64 6f 63 75 6d 65 6e 74 | 61 74 69 6f 6e 20 6f 66 |document|ation of|
|00001a30| 20 60 71 75 61 69 6c 2d | 64 65 66 69 6e 65 2d 70 | `quail-|define-p|
|00001a40| 61 63 6b 61 67 65 27 2e | 1f 0a 28 64 65 66 61 6c |ackage'.|..(defal|
|00001a50| 69 61 73 20 27 71 75 61 | 69 6c 2d 73 68 6f 77 2d |ias 'qua|il-show-|
|00001a60| 6c 61 79 6f 75 74 20 23 | 5b 6e 69 6c 20 22 c0 09 |layout #|[nil "..|
|00001a70| 38 87 22 20 5b 39 20 71 | 75 61 69 6c 2d 63 75 72 |8." [9 q|uail-cur|
|00001a80| 72 65 6e 74 2d 70 61 63 | 6b 61 67 65 5d 20 32 20 |rent-pac|kage] 2 |
|00001a90| 28 23 24 20 2e 20 36 36 | 31 39 29 5d 29 0a 28 62 |(#$ . 66|19)]).(b|
|00001aa0| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 4e c2 73 ac |yte-code| "..N.s.|
|00001ab0| 85 c3 c4 c0 5c 22 88 c5 | c0 c1 c6 23 87 22 20 5b |....\"..|...#." [|
|00001ac0| 71 75 61 69 6c 2d 73 68 | 6f 77 2d 6c 61 79 6f 75 |quail-sh|ow-layou|
|00001ad0| 74 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 72 |t byte-o|ptimizer|
|00001ae0| 20 28 6e 69 6c 20 62 79 | 74 65 2d 63 6f 6d 70 69 | (nil by|te-compi|
|00001af0| 6c 65 2d 69 6e 6c 69 6e | 65 2d 65 78 70 61 6e 64 |le-inlin|e-expand|
|00001b00| 29 20 65 72 72 6f 72 20 | 22 25 73 20 61 6c 72 65 |) error |"%s alre|
|00001b10| 61 64 79 20 68 61 73 20 | 61 20 62 79 74 65 2d 6f |ady has |a byte-o|
|00001b20| 70 74 69 6d 69 7a 65 72 | 2c 20 63 61 6e 27 74 20 |ptimizer|, can't |
|00001b30| 6d 61 6b 65 20 69 74 20 | 69 6e 6c 69 6e 65 22 20 |make it |inline" |
|00001b40| 70 75 74 20 62 79 74 65 | 2d 63 6f 6d 70 69 6c 65 |put byte|-compile|
|00001b50| 2d 69 6e 6c 69 6e 65 2d | 65 78 70 61 6e 64 5d 20 |-inline-|expand] |
|00001b60| 34 29 0a 23 40 31 30 34 | 20 52 65 74 75 72 6e 20 |4).#@104| Return |
|00001b70| 64 65 63 6f 64 65 20 6d | 61 70 20 6f 66 20 74 68 |decode m|ap of th|
|00001b80| 65 20 63 75 72 72 65 6e | 74 20 51 75 61 69 6c 20 |e curren|t Quail |
|00001b90| 70 61 63 6b 61 67 65 2e | 0a 49 74 20 69 73 20 61 |package.|.It is a|
|00001ba0| 6e 20 61 6c 69 73 74 20 | 6f 66 20 74 72 61 6e 73 |n alist |of trans|
|00001bb0| 6c 61 74 69 6f 6e 73 20 | 61 6e 64 20 63 6f 72 72 |lations |and corr|
|00001bc0| 65 73 70 6f 6e 64 69 6e | 67 20 6b 65 79 73 2e 1f |espondin|g keys..|
|00001bd0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 71 75 61 69 |.(defali|as 'quai|
|00001be0| 6c 2d 64 65 63 6f 64 65 | 2d 6d 61 70 20 23 5b 6e |l-decode|-map #[n|
|00001bf0| 69 6c 20 22 c0 09 38 87 | 22 20 5b 31 30 20 71 75 |il "..8.|" [10 qu|
|00001c00| 61 69 6c 2d 63 75 72 72 | 65 6e 74 2d 70 61 63 6b |ail-curr|ent-pack|
|00001c10| 61 67 65 5d 20 32 20 28 | 23 24 20 2e 20 37 30 31 |age] 2 (|#$ . 701|
|00001c20| 37 29 5d 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |7)]).(by|te-code |
|00001c30| 22 c0 c1 4e c2 73 ac 85 | c3 c4 c0 5c 22 88 c5 c0 |"..N.s..|...\"...|
|00001c40| c1 c6 23 87 22 20 5b 71 | 75 61 69 6c 2d 64 65 63 |..#." [q|uail-dec|
|00001c50| 6f 64 65 2d 6d 61 70 20 | 62 79 74 65 2d 6f 70 74 |ode-map |byte-opt|
|00001c60| 69 6d 69 7a 65 72 20 28 | 6e 69 6c 20 62 79 74 65 |imizer (|nil byte|
|00001c70| 2d 63 6f 6d 70 69 6c 65 | 2d 69 6e 6c 69 6e 65 2d |-compile|-inline-|
|00001c80| 65 78 70 61 6e 64 29 20 | 65 72 72 6f 72 20 22 25 |expand) |error "%|
|00001c90| 73 20 61 6c 72 65 61 64 | 79 20 68 61 73 20 61 20 |s alread|y has a |
|00001ca0| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 72 2c 20 |byte-opt|imizer, |
|00001cb0| 63 61 6e 27 74 20 6d 61 | 6b 65 20 69 74 20 69 6e |can't ma|ke it in|
|00001cc0| 6c 69 6e 65 22 20 70 75 | 74 20 62 79 74 65 2d 63 |line" pu|t byte-c|
|00001cd0| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00001ce0| 70 61 6e 64 5d 20 34 29 | 0a 23 40 31 31 36 20 52 |pand] 4)|.#@116 R|
|00001cf0| 65 74 75 72 6e 20 60 6d | 61 78 69 6d 75 6d 2d 73 |eturn `m|aximum-s|
|00001d00| 68 6f 72 74 65 73 74 27 | 20 66 6c 61 67 20 6f 66 |hortest'| flag of|
|00001d10| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 51 75 61 | the cur|rent Qua|
|00001d20| 69 6c 20 70 61 63 6b 61 | 67 65 2e 0a 53 65 65 20 |il packa|ge..See |
|00001d30| 61 6c 73 6f 20 74 68 65 | 20 64 6f 63 75 6d 65 6e |also the| documen|
|00001d40| 74 61 74 69 6f 6e 20 6f | 66 20 60 71 75 61 69 6c |tation o|f `quail|
|00001d50| 2d 64 65 66 69 6e 65 2d | 70 61 63 6b 61 67 65 27 |-define-|package'|
|00001d60| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 71 75 |...(defa|lias 'qu|
|00001d70| 61 69 6c 2d 6d 61 78 69 | 6d 75 6d 2d 73 68 6f 72 |ail-maxi|mum-shor|
|00001d80| 74 65 73 74 20 23 5b 6e | 69 6c 20 22 c0 09 38 87 |test #[n|il "..8.|
|00001d90| 22 20 5b 31 31 20 71 75 | 61 69 6c 2d 63 75 72 72 |" [11 qu|ail-curr|
|00001da0| 65 6e 74 2d 70 61 63 6b | 61 67 65 5d 20 32 20 28 |ent-pack|age] 2 (|
|00001db0| 23 24 20 2e 20 37 34 30 | 37 29 5d 29 0a 28 62 79 |#$ . 740|7)]).(by|
|00001dc0| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 4e c2 73 ac 85 |te-code |"..N.s..|
|00001dd0| c3 c4 c0 5c 22 88 c5 c0 | c1 c6 23 87 22 20 5b 71 |...\"...|..#." [q|
|00001de0| 75 61 69 6c 2d 6d 61 78 | 69 6d 75 6d 2d 73 68 6f |uail-max|imum-sho|
|00001df0| 72 74 65 73 74 20 62 79 | 74 65 2d 6f 70 74 69 6d |rtest by|te-optim|
|00001e00| 69 7a 65 72 20 28 6e 69 | 6c 20 62 79 74 65 2d 63 |izer (ni|l byte-c|
|00001e10| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00001e20| 70 61 6e 64 29 20 65 72 | 72 6f 72 20 22 25 73 20 |pand) er|ror "%s |
|00001e30| 61 6c 72 65 61 64 79 20 | 68 61 73 20 61 20 62 79 |already |has a by|
|00001e40| 74 65 2d 6f 70 74 69 6d | 69 7a 65 72 2c 20 63 61 |te-optim|izer, ca|
|00001e50| 6e 27 74 20 6d 61 6b 65 | 20 69 74 20 69 6e 6c 69 |n't make| it inli|
|00001e60| 6e 65 22 20 70 75 74 20 | 62 79 74 65 2d 63 6f 6d |ne" put |byte-com|
|00001e70| 70 69 6c 65 2d 69 6e 6c | 69 6e 65 2d 65 78 70 61 |pile-inl|ine-expa|
|00001e80| 6e 64 5d 20 34 29 0a 23 | 40 37 30 20 52 65 74 75 |nd] 4).#|@70 Retu|
|00001e90| 72 6e 20 70 72 6f 70 65 | 72 74 79 20 6c 69 73 74 |rn prope|rty list|
|00001ea0| 20 6f 66 20 61 6e 20 6f | 76 65 72 6c 79 20 75 73 | of an o|verly us|
|00001eb0| 65 64 20 69 6e 20 74 68 | 65 20 63 75 72 72 65 6e |ed in th|e curren|
|00001ec0| 74 20 51 75 61 69 6c 20 | 70 61 63 6b 61 67 65 2e |t Quail |package.|
|00001ed0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 71 75 61 |..(defal|ias 'qua|
|00001ee0| 69 6c 2d 6f 76 65 72 6c | 61 79 2d 70 6c 69 73 74 |il-overl|ay-plist|
|00001ef0| 20 23 5b 6e 69 6c 20 22 | c0 09 38 87 22 20 5b 31 | #[nil "|..8." [1|
|00001f00| 32 20 71 75 61 69 6c 2d | 63 75 72 72 65 6e 74 2d |2 quail-|current-|
|00001f10| 70 61 63 6b 61 67 65 5d | 20 32 20 28 23 24 20 2e |package]| 2 (#$ .|
|00001f20| 20 37 38 32 30 29 5d 29 | 0a 28 62 79 74 65 2d 63 | 7820)])|.(byte-c|
|00001f30| 6f 64 65 20 22 c0 c1 4e | c2 73 ac 85 c3 c4 c0 5c |ode "..N|.s.....\|
|00001f40| 22 88 c5 c0 c1 c6 23 87 | 22 20 5b 71 75 61 69 6c |".....#.|" [quail|
|00001f50| 2d 6f 76 65 72 6c 61 79 | 2d 70 6c 69 73 74 20 62 |-overlay|-plist b|
|00001f60| 79 74 65 2d 6f 70 74 69 | 6d 69 7a 65 72 20 28 6e |yte-opti|mizer (n|
|00001f70| 69 6c 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |il byte-|compile-|
|00001f80| 69 6e 6c 69 6e 65 2d 65 | 78 70 61 6e 64 29 20 65 |inline-e|xpand) e|
|00001f90| 72 72 6f 72 20 22 25 73 | 20 61 6c 72 65 61 64 79 |rror "%s| already|
|00001fa0| 20 68 61 73 20 61 20 62 | 79 74 65 2d 6f 70 74 69 | has a b|yte-opti|
|00001fb0| 6d 69 7a 65 72 2c 20 63 | 61 6e 27 74 20 6d 61 6b |mizer, c|an't mak|
|00001fc0| 65 20 69 74 20 69 6e 6c | 69 6e 65 22 20 70 75 74 |e it inl|ine" put|
|00001fd0| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 69 6e | byte-co|mpile-in|
|00001fe0| 6c 69 6e 65 2d 65 78 70 | 61 6e 64 5d 20 34 29 0a |line-exp|and] 4).|
|00001ff0| 23 40 37 34 20 52 65 74 | 75 72 6e 20 61 20 66 75 |#@74 Ret|urn a fu|
|00002000| 6e 63 74 69 6f 6e 20 66 | 6f 72 20 75 70 64 61 74 |nction f|or updat|
|00002010| 69 6e 67 20 74 72 61 6e | 73 6c 61 74 69 6f 6e 20 |ing tran|slation |
|00002020| 69 6e 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 51 |in the c|urrent Q|
|00002030| 75 61 69 6c 20 70 61 63 | 6b 61 67 65 2e 1f 0a 28 |uail pac|kage...(|
|00002040| 64 65 66 61 6c 69 61 73 | 20 27 71 75 61 69 6c 2d |defalias| 'quail-|
|00002050| 75 70 64 61 74 65 2d 74 | 72 61 6e 73 6c 61 74 69 |update-t|ranslati|
|00002060| 6f 6e 2d 66 75 6e 63 74 | 69 6f 6e 20 23 5b 6e 69 |on-funct|ion #[ni|
|00002070| 6c 20 22 c0 09 38 87 22 | 20 5b 31 33 20 71 75 61 |l "..8."| [13 qua|
|00002080| 69 6c 2d 63 75 72 72 65 | 6e 74 2d 70 61 63 6b 61 |il-curre|nt-packa|
|00002090| 67 65 5d 20 32 20 28 23 | 24 20 2e 20 38 31 38 31 |ge] 2 (#|$ . 8181|
|000020a0| 29 5d 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |)]).(byt|e-code "|
|000020b0| c0 c1 4e c2 73 ac 85 c3 | c4 c0 5c 22 88 c5 c0 c1 |..N.s...|..\"....|
|000020c0| c6 23 87 22 20 5b 71 75 | 61 69 6c 2d 75 70 64 61 |.#." [qu|ail-upda|
|000020d0| 74 65 2d 74 72 61 6e 73 | 6c 61 74 69 6f 6e 2d 66 |te-trans|lation-f|
|000020e0| 75 6e 63 74 69 6f 6e 20 | 62 79 74 65 2d 6f 70 74 |unction |byte-opt|
|000020f0| 69 6d 69 7a 65 72 20 28 | 6e 69 6c 20 62 79 74 65 |imizer (|nil byte|
|00002100| 2d 63 6f 6d 70 69 6c 65 | 2d 69 6e 6c 69 6e 65 2d |-compile|-inline-|
|00002110| 65 78 70 61 6e 64 29 20 | 65 72 72 6f 72 20 22 25 |expand) |error "%|
|00002120| 73 20 61 6c 72 65 61 64 | 79 20 68 61 73 20 61 20 |s alread|y has a |
|00002130| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 72 2c 20 |byte-opt|imizer, |
|00002140| 63 61 6e 27 74 20 6d 61 | 6b 65 20 69 74 20 69 6e |can't ma|ke it in|
|00002150| 6c 69 6e 65 22 20 70 75 | 74 20 62 79 74 65 2d 63 |line" pu|t byte-c|
|00002160| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00002170| 70 61 6e 64 5d 20 34 29 | 0a 23 40 31 36 34 20 52 |pand] 4)|.#@164 R|
|00002180| 65 74 75 72 6e 20 63 6f | 6e 76 65 72 73 69 6f 6e |eturn co|nversion|
|00002190| 20 6b 65 79 6d 61 70 20 | 69 6e 20 74 68 65 20 63 | keymap |in the c|
|000021a0| 75 72 72 65 6e 74 20 51 | 75 61 69 6c 20 70 61 63 |urrent Q|uail pac|
|000021b0| 6b 61 67 65 2e 0a 43 6f | 6e 76 65 72 73 69 6f 6e |kage..Co|nversion|
|000021c0| 20 6b 65 79 6d 61 70 20 | 69 73 20 61 20 6b 65 79 | keymap |is a key|
|000021d0| 6d 61 70 20 75 73 65 64 | 20 77 68 69 6c 65 20 63 |map used| while c|
|000021e0| 6f 6e 76 65 72 73 69 6f | 6e 20 72 65 67 69 6f 6e |onversio|n region|
|000021f0| 20 69 73 20 61 63 74 69 | 76 65 0a 20 62 75 74 20 | is acti|ve. but |
|00002200| 74 72 61 6e 73 6c 61 74 | 69 6f 6e 20 72 65 67 69 |translat|ion regi|
|00002210| 6f 6e 20 69 73 20 6e 6f | 74 20 61 63 74 69 76 65 |on is no|t active|
|00002220| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 71 75 |...(defa|lias 'qu|
|00002230| 61 69 6c 2d 63 6f 6e 76 | 65 72 73 69 6f 6e 2d 6b |ail-conv|ersion-k|
|00002240| 65 79 6d 61 70 20 23 5b | 6e 69 6c 20 22 c0 09 38 |eymap #[|nil "..8|
|00002250| 87 22 20 5b 31 34 20 71 | 75 61 69 6c 2d 63 75 72 |." [14 q|uail-cur|
|00002260| 72 65 6e 74 2d 70 61 63 | 6b 61 67 65 5d 20 32 20 |rent-pac|kage] 2 |
|00002270| 28 23 24 20 2e 20 38 35 | 37 35 29 5d 29 0a 28 62 |(#$ . 85|75)]).(b|
|00002280| 79 74 65 2d 63 6f 64 65 | 20 22 c0 c1 4e c2 73 ac |yte-code| "..N.s.|
|00002290| 85 c3 c4 c0 5c 22 88 c5 | c0 c1 c6 23 87 22 20 5b |....\"..|...#." [|
|000022a0| 71 75 61 69 6c 2d 63 6f | 6e 76 65 72 73 69 6f 6e |quail-co|nversion|
|000022b0| 2d 6b 65 79 6d 61 70 20 | 62 79 74 65 2d 6f 70 74 |-keymap |byte-opt|
|000022c0| 69 6d 69 7a 65 72 20 28 | 6e 69 6c 20 62 79 74 65 |imizer (|nil byte|
|000022d0| 2d 63 6f 6d 70 69 6c 65 | 2d 69 6e 6c 69 6e 65 2d |-compile|-inline-|
|000022e0| 65 78 70 61 6e 64 29 20 | 65 72 72 6f 72 20 22 25 |expand) |error "%|
|000022f0| 73 20 61 6c 72 65 61 64 | 79 20 68 61 73 20 61 20 |s alread|y has a |
|00002300| 62 79 74 65 2d 6f 70 74 | 69 6d 69 7a 65 72 2c 20 |byte-opt|imizer, |
|00002310| 63 61 6e 27 74 20 6d 61 | 6b 65 20 69 74 20 69 6e |can't ma|ke it in|
|00002320| 6c 69 6e 65 22 20 70 75 | 74 20 62 79 74 65 2d 63 |line" pu|t byte-c|
|00002330| 6f 6d 70 69 6c 65 2d 69 | 6e 6c 69 6e 65 2d 65 78 |ompile-i|nline-ex|
|00002340| 70 61 6e 64 5d 20 34 29 | 0a 23 40 35 30 20 52 65 |pand] 4)|.#@50 Re|
|00002350| 74 75 72 6e 20 74 20 69 | 66 20 74 68 65 20 63 75 |turn t i|f the cu|
|00002360| 72 72 65 6e 74 20 51 75 | 61 69 6c 20 70 61 63 6b |rrent Qu|ail pack|
|00002370| 61 67 65 20 69 73 20 73 | 69 6d 70 6c 65 2e 1f 0a |age is s|imple...|
|00002380| 28 64 65 66 61 6c 69 61 | 73 20 27 71 75 61 69 6c |(defalia|s 'quail|
|00002390| 2d 73 69 6d 70 6c 65 20 | 23 5b 6e 69 6c 20 22 c0 |-simple |#[nil ".|
|000023a0| 09 38 87 22 20 5b 31 35 | 20 71 75 61 69 6c 2d 63 |.8." [15| quail-c|
|000023b0| 75 72 72 65 6e 74 2d 70 | 61 63 6b 61 67 65 5d 20 |urrent-p|ackage] |
|000023c0| 32 20 28 23 24 20 2e 20 | 39 30 33 38 29 5d 29 0a |2 (#$ . |9038)]).|
|000023d0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 c1 4e c2 |(byte-co|de "..N.|
|000023e0| 73 ac 85 c3 c4 c0 5c 22 | 88 c5 c0 c1 c6 23 87 22 |s.....\"|.....#."|
|000023f0| 20 5b 71 75 61 69 6c 2d | 73 69 6d 70 6c 65 20 62 | [quail-|simple b|
|00002400| 79 74 65 2d 6f 70 74 69 | 6d 69 7a 65 72 20 28 6e |yte-opti|mizer (n|
|00002410| 69 6c 20 62 79 74 65 2d | 63 6f 6d 70 69 6c 65 2d |il byte-|compile-|
|00002420| 69 6e 6c 69 6e 65 2d 65 | 78 70 61 6e 64 29 20 65 |inline-e|xpand) e|
|00002430| 72 72 6f 72 20 22 25 73 | 20 61 6c 72 65 61 64 79 |rror "%s| already|
|00002440| 20 68 61 73 20 61 20 62 | 79 74 65 2d 6f 70 74 69 | has a b|yte-opti|
|00002450| 6d 69 7a 65 72 2c 20 63 | 61 6e 27 74 20 6d 61 6b |mizer, c|an't mak|
|00002460| 65 20 69 74 20 69 6e 6c | 69 6e 65 22 20 70 75 74 |e it inl|ine" put|
|00002470| 20 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 69 6e | byte-co|mpile-in|
|00002480| 6c 69 6e 65 2d 65 78 70 | 61 6e 64 5d 20 34 29 0a |line-exp|and] 4).|
|00002490| 23 40 33 34 20 52 65 74 | 75 72 6e 20 51 75 61 69 |#@34 Ret|urn Quai|
|000024a0| 6c 20 70 61 63 6b 61 67 | 65 20 6e 61 6d 65 64 20 |l packag|e named |
|000024b0| 4e 41 4d 45 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |NAME...(|defalias|
|000024c0| 20 27 71 75 61 69 6c 2d | 70 61 63 6b 61 67 65 20 | 'quail-|package |
|000024d0| 23 5b 28 6e 61 6d 65 29 | 20 22 c0 09 5c 6e 5c 22 |#[(name)| "..\n\"|
|000024e0| 87 22 20 5b 61 73 73 6f | 63 20 6e 61 6d 65 20 71 |." [asso|c name q|
|000024f0| 75 61 69 6c 2d 70 61 63 | 6b 61 67 65 2d 61 6c 69 |uail-pac|kage-ali|
|00002500| 73 74 5d 20 33 20 28 23 | 24 20 2e 20 39 33 36 35 |st] 3 (#|$ . 9365|
|00002510| 29 5d 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |)]).(byt|e-code "|
|00002520| c0 c1 4e c2 73 ac 85 c3 | c4 c0 5c 22 88 c5 c0 c1 |..N.s...|..\"....|
|00002530| c6 23 87 22 20 5b 71 75 | 61 69 6c 2d 70 61 63 6b |.#." [qu|ail-pack|
|00002540| 61 67 65 20 62 79 74 65 | 2d 6f 70 74 69 6d 69 7a |age byte|-optimiz|
|00002550| 65 72 20 28 6e 69 6c 20 | 62 79 74 65 2d 63 6f 6d |er (nil |byte-com|
|00002560| 70 69 6c 65 2d 69 6e 6c | 69 6e 65 2d 65 78 70 61 |pile-inl|ine-expa|
|00002570| 6e 64 29 20 65 72 72 6f | 72 20 22 25 73 20 61 6c |nd) erro|r "%s al|
|00002580| 72 65 61 64 79 20 68 61 | 73 20 61 20 62 79 74 65 |ready ha|s a byte|
|00002590| 2d 6f 70 74 69 6d 69 7a | 65 72 2c 20 63 61 6e 27 |-optimiz|er, can'|
|000025a0| 74 20 6d 61 6b 65 20 69 | 74 20 69 6e 6c 69 6e 65 |t make i|t inline|
|000025b0| 22 20 70 75 74 20 62 79 | 74 65 2d 63 6f 6d 70 69 |" put by|te-compi|
|000025c0| 6c 65 2d 69 6e 6c 69 6e | 65 2d 65 78 70 61 6e 64 |le-inlin|e-expand|
|000025d0| 5d 20 34 29 0a 23 40 35 | 33 20 41 64 64 20 51 75 |] 4).#@5|3 Add Qu|
|000025e0| 61 69 6c 20 70 61 63 6b | 61 67 65 20 50 41 43 4b |ail pack|age PACK|
|000025f0| 41 47 45 20 74 6f 20 60 | 71 75 61 69 6c 2d 70 61 |AGE to `|quail-pa|
|00002600| 63 6b 61 67 65 2d 61 6c | 69 73 74 27 2e 1f 0a 28 |ckage-al|ist'...(|
|00002610| 64 65 66 61 6c 69 61 73 | 20 27 71 75 61 69 6c 2d |defalias| 'quail-|
|00002620| 61 64 64 2d 70 61 63 6b | 61 67 65 20 23 5b 28 70 |add-pack|age #[(p|
|00002630| 61 63 6b 61 67 65 29 20 | 22 08 40 19 c2 09 0b 5c |ackage) |".@....\|
|00002640| 22 29 89 1c ab 86 0c 08 | 41 a1 aa 85 08 0b 42 89 |")......|A.....B.|
|00002650| 13 29 87 22 20 5b 70 61 | 63 6b 61 67 65 20 6e 61 |.)." [pa|ckage na|
|00002660| 6d 65 20 61 73 73 6f 63 | 20 71 75 61 69 6c 2d 70 |me assoc| quail-p|
|00002670| 61 63 6b 61 67 65 2d 61 | 6c 69 73 74 20 70 61 63 |ackage-a|list pac|
|00002680| 5d 20 34 20 28 23 24 20 | 2e 20 39 36 39 30 29 5d |] 4 (#$ |. 9690)]|
|00002690| 29 0a 23 40 36 33 20 53 | 65 6c 65 63 74 20 51 75 |).#@63 S|elect Qu|
|000026a0| 61 69 6c 20 70 61 63 6b | 61 67 65 20 6e 61 6d 65 |ail pack|age name|
|000026b0| 64 20 4e 41 4d 45 20 61 | 73 20 74 68 65 20 63 75 |d NAME a|s the cu|
|000026c0| 72 72 65 6e 74 20 51 75 | 61 69 6c 20 70 61 63 6b |rrent Qu|ail pack|
|000026d0| 61 67 65 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |age...(d|efalias |
|000026e0| 27 71 75 61 69 6c 2d 73 | 65 6c 65 63 74 2d 70 61 |'quail-s|elect-pa|
|000026f0| 63 6b 61 67 65 20 23 5b | 28 6e 61 6d 65 29 20 22 |ckage #[|(name) "|
|00002700| 08 18 c1 08 5c 6e 5c 22 | 29 89 1b ac 85 c4 c5 08 |....\n\"|).......|
|00002710| 5c 22 88 0b 16 06 c7 c6 | 0b 5c 22 88 08 29 87 22 |\"......|.\"..)."|
|00002720| 20 5b 6e 61 6d 65 20 61 | 73 73 6f 63 20 71 75 61 | [name a|ssoc qua|
|00002730| 69 6c 2d 70 61 63 6b 61 | 67 65 2d 61 6c 69 73 74 |il-packa|ge-alist|
|00002740| 20 70 61 63 6b 61 67 65 | 20 65 72 72 6f 72 20 22 | package| error "|
|00002750| 4e 6f 20 51 75 61 69 6c | 20 70 61 63 6b 61 67 65 |No Quail| package|
|00002760| 20 60 25 73 27 22 20 71 | 75 61 69 6c 2d 63 75 72 | `%s'" q|uail-cur|
|00002770| 72 65 6e 74 2d 70 61 63 | 6b 61 67 65 20 73 65 74 |rent-pac|kage set|
|00002780| 2d 64 65 66 61 75 6c 74 | 5d 20 34 20 28 23 24 20 |-default|] 4 (#$ |
|00002790| 2e 20 39 38 37 39 29 5d | 29 0a 23 40 31 31 38 20 |. 9879)]|).#@118 |
|000027a0| 53 74 61 72 74 20 75 73 | 69 6e 67 20 51 75 61 69 |Start us|ing Quai|
|000027b0| 6c 20 70 61 63 6b 61 67 | 65 20 50 41 43 4b 41 47 |l packag|e PACKAG|
|000027c0| 45 2d 4e 41 4d 45 2e 0a | 54 68 65 20 72 65 6d 61 |E-NAME..|The rema|
|000027d0| 69 6e 69 6e 67 20 61 72 | 67 75 6d 65 6e 74 73 20 |ining ar|guments |
|000027e0| 61 72 65 20 6c 69 62 72 | 61 72 69 65 73 20 74 6f |are libr|aries to|
|000027f0| 20 62 65 20 6c 6f 61 64 | 65 64 20 62 65 66 6f 72 | be load|ed befor|
|00002800| 65 20 75 73 69 6e 67 20 | 74 68 65 20 70 61 63 6b |e using |the pack|
|00002810| 61 67 65 2e 1f 0a 28 64 | 65 66 61 6c 69 61 73 20 |age...(d|efalias |
|00002820| 27 71 75 61 69 6c 2d 75 | 73 65 2d 70 61 63 6b 61 |'quail-u|se-packa|
|00002830| 67 65 20 23 5b 28 70 61 | 63 6b 61 67 65 2d 6e 61 |ge #[(pa|ckage-na|
|00002840| 6d 65 20 26 72 65 73 74 | 20 6c 69 62 72 61 72 69 |me &rest| librari|
|00002850| 65 73 29 20 22 08 19 c2 | 09 0b 5c 22 29 89 1c ac |es) "...|..\")...|
|00002860| af 0d ab ac c6 0d 40 c7 | 5c 22 ac 9f c8 90 c9 ca |......@.|\"......|
|00002870| 21 88 c9 08 21 88 c9 cb | 21 88 c9 0d 40 21 88 c9 |!...!...|!...@!..|
|00002880| cc 21 91 88 cd ce 08 5c | 22 88 aa 57 0d 41 89 15 |.!.....\|"..W.A..|
|00002890| ac 54 29 cf 08 21 88 0e | 10 41 40 16 11 d2 d3 21 |.T)..!..|.A@....!|
|000028a0| 87 22 20 5b 70 61 63 6b | 61 67 65 2d 6e 61 6d 65 |." [pack|age-name|
|000028b0| 20 6e 61 6d 65 20 61 73 | 73 6f 63 20 71 75 61 69 | name as|soc quai|
|000028c0| 6c 2d 70 61 63 6b 61 67 | 65 2d 61 6c 69 73 74 20 |l-packag|e-alist |
|000028d0| 70 61 63 6b 61 67 65 20 | 6c 69 62 72 61 72 69 65 |package |librarie|
|000028e0| 73 20 6c 6f 61 64 20 74 | 20 22 2a 48 65 6c 70 2a |s load t| "*Help*|
|000028f0| 22 20 70 72 69 6e 63 20 | 22 51 75 61 69 6c 20 70 |" princ |"Quail p|
|00002900| 61 63 6b 61 67 65 20 5c | 22 22 20 22 5c 22 20 63 |ackage \|"" "\" c|
|00002910| 61 6e 27 74 20 62 65 20 | 61 63 74 69 76 61 74 65 |an't be |activate|
|00002920| 64 5c 6e 20 20 62 65 63 | 61 75 73 65 20 6c 69 62 |d\n  bec|ause lib|
|00002930| 72 61 72 79 20 5c 22 22 | 20 22 5c 22 20 69 73 20 |rary \""| "\" is |
|00002940| 6e 6f 74 20 69 6e 20 60 | 6c 6f 61 64 2d 70 61 74 |not in `|load-pat|
|00002950| 68 27 2e 5c 6e 5c 6e 54 | 68 65 20 6d 6f 73 74 20 |h'.\n\nT|he most |
|00002960| 63 6f 6d 6d 6f 6e 20 63 | 61 73 65 20 69 73 20 74 |common c|ase is t|
|00002970| 68 61 74 20 79 6f 75 20 | 68 61 76 65 20 6e 6f 74 |hat you |have not|
|00002980| 20 79 65 74 20 69 6e 73 | 74 61 6c 6c 65 64 20 61 | yet ins|talled a|
|00002990| 70 70 72 6f 70 72 69 61 | 74 65 5c 6e 6c 69 62 72 |ppropria|te\nlibr|
|000029a0| 61 72 69 65 73 20 69 6e | 20 4c 45 49 4d 20 28 4c |aries in| LEIM (L|
|000029b0| 69 62 72 61 72 69 65 73 | 20 6f 66 20 45 6d 61 63 |ibraries| of Emac|
|000029c0| 73 20 49 6e 70 75 74 20 | 4d 65 74 68 6f 64 29 20 |s Input |Method) |
|000029d0| 77 68 69 63 68 20 69 73 | 5c 6e 64 69 73 74 72 69 |which is|\ndistri|
|000029e0| 62 75 74 65 64 20 73 65 | 70 61 72 61 74 65 6c 79 |buted se|parately|
|000029f0| 20 66 72 6f 6d 20 45 6d | 61 63 73 2e 5c 6e 5c 6e | from Em|acs.\n\n|
|00002a00| 4c 45 49 4d 20 69 73 20 | 61 76 61 69 6c 61 62 6c |LEIM is |availabl|
|00002a10| 65 20 66 72 6f 6d 20 74 | 68 65 20 73 61 6d 65 20 |e from t|he same |
|00002a20| 66 74 70 20 64 69 72 65 | 63 74 6f 72 79 20 61 73 |ftp dire|ctory as|
|00002a30| 20 45 6d 61 63 73 2e 22 | 20 65 72 72 6f 72 20 22 | Emacs."| error "|
|00002a40| 43 61 6e 27 74 20 75 73 | 65 20 74 68 65 20 51 75 |Can't us|e the Qu|
|00002a50| 61 69 6c 20 70 61 63 6b | 61 67 65 20 60 25 73 27 |ail pack|age `%s'|
|00002a60| 22 20 71 75 61 69 6c 2d | 73 65 6c 65 63 74 2d 70 |" quail-|select-p|
|00002a70| 61 63 6b 61 67 65 20 71 | 75 61 69 6c 2d 63 75 72 |ackage q|uail-cur|
|00002a80| 72 65 6e 74 2d 70 61 63 | 6b 61 67 65 20 63 75 72 |rent-pac|kage cur|
|00002a90| 72 65 6e 74 2d 69 6e 70 | 75 74 2d 6d 65 74 68 6f |rent-inp|ut-metho|
|00002aa0| 64 2d 74 69 74 6c 65 20 | 71 75 61 69 6c 2d 6d 6f |d-title |quail-mo|
|00002ab0| 64 65 20 31 5d 20 34 20 | 28 23 24 20 2e 20 31 30 |de 1] 4 |(#$ . 10|
|00002ac0| 31 34 34 29 5d 29 0a 23 | 40 33 30 20 54 75 72 6e |144)]).#|@30 Turn|
|00002ad0| 20 6f 66 66 20 51 75 61 | 69 6c 20 69 6e 70 75 74 | off Qua|il input|
|00002ae0| 20 6d 65 74 68 6f 64 2e | 1f 0a 28 64 65 66 61 6c | method.|..(defal|
|00002af0| 69 61 73 20 27 71 75 61 | 69 6c 2d 69 6e 61 63 74 |ias 'qua|il-inact|
|00002b00| 69 76 61 74 65 20 23 5b | 6e 69 6c 20 22 c0 11 c2 |ivate #[|nil "...|
|00002b10| c3 21 87 22 20 5b 6e 69 | 6c 20 6f 76 65 72 72 69 |.!." [ni|l overri|
|00002b20| 64 69 6e 67 2d 74 65 72 | 6d 69 6e 61 6c 2d 6c 6f |ding-ter|minal-lo|
|00002b30| 63 61 6c 2d 6d 61 70 20 | 71 75 61 69 6c 2d 6d 6f |cal-map |quail-mo|
|00002b40| 64 65 20 2d 31 5d 20 32 | 20 28 23 24 20 2e 20 31 |de -1] 2| (#$ . 1|
|00002b50| 30 39 35 36 29 20 6e 69 | 6c 5d 29 0a 28 62 79 74 |0956) ni|l]).(byt|
|00002b60| 65 2d 63 6f 64 65 20 22 | c0 09 b7 ac 84 c2 09 42 |e-code "|.......B|
|00002b70| 11 c0 87 22 20 5b 71 75 | 61 69 6c 2d 6d 6f 64 65 |..." [qu|ail-mode|
|00002b80| 20 6d 69 6e 6f 72 2d 6d | 6f 64 65 2d 61 6c 69 73 | minor-m|ode-alis|
|00002b90| 74 20 28 71 75 61 69 6c | 2d 6d 6f 64 65 20 22 20 |t (quail|-mode " |
|00002ba0| 51 75 61 69 6c 22 29 5d | 20 32 29 0a 23 40 32 34 |Quail")]| 2).#@24|
|00002bb0| 20 4b 65 79 6d 61 70 20 | 66 6f 72 20 51 75 61 69 | Keymap |for Quai|
|00002bc0| 6c 20 6d 6f 64 65 2e 1f | 0a 28 64 65 66 76 61 72 |l mode..|.(defvar|
|00002bd0| 20 71 75 61 69 6c 2d 6d | 6f 64 65 2d 6d 61 70 20 | quail-m|ode-map |
|00002be0| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 20 c1 1a |(byte-co|de ". ..|
|00002bf0| 1b 5c 6e c4 57 ab 8e c5 | 0b c6 5c 6e 21 c7 23 88 |.\n.W...|..\n!.#.|
|00002c00| 5c 6e 54 89 12 aa 6e c8 | 12 c8 c9 57 ab 90 c5 0b |\nT...n.|...W....|
|00002c10| ca cb 5c 6e 21 21 c7 23 | 88 5c 6e 54 89 12 aa 6c |..\n!!.#|.\nT...l|
|00002c20| 0b 2a 87 22 20 5b 6d 61 | 6b 65 2d 6b 65 79 6d 61 |.*." [ma|ke-keyma|
|00002c30| 70 20 3f 5c 20 20 69 20 | 6d 61 70 20 31 32 37 20 |p ?\  i |map 127 |
|00002c40| 64 65 66 69 6e 65 2d 6b | 65 79 20 63 68 61 72 2d |define-k|ey char-|
|00002c50| 74 6f 2d 73 74 72 69 6e | 67 20 71 75 61 69 6c 2d |to-strin|g quail-|
|00002c60| 73 74 61 72 74 2d 74 72 | 61 6e 73 6c 61 74 69 6f |start-tr|anslatio|
|00002c70| 6e 20 31 32 38 20 32 35 | 36 20 76 65 63 74 6f 72 |n 128 25|6 vector|
|00002c80| 20 69 6e 74 2d 63 68 61 | 72 5d 20 36 29 20 28 23 | int-cha|r] 6) (#|
|00002c90| 24 20 2e 20 31 31 31 38 | 35 29 29 0a 28 62 79 74 |$ . 1118|5)).(byt|
|00002ca0| 65 2d 63 6f 64 65 20 22 | c0 09 b7 ac 86 c0 5c 6e |e-code "|......\n|
|00002cb0| 42 09 42 11 c3 c1 c4 5c | 22 ab 96 c5 c1 21 1e 06 |B.B....\|"....!..|
|00002cc0| c0 0e 06 b7 ac 8a c7 c1 | c0 5c 6e 42 0e 06 42 5c |........|.\nB..B\|
|00002cd0| 22 88 29 c4 87 22 20 5b | 71 75 61 69 6c 2d 6d 6f |".).." [|quail-mo|
|00002ce0| 64 65 20 6d 69 6e 6f 72 | 2d 6d 6f 64 65 2d 6d 61 |de minor|-mode-ma|
|00002cf0| 70 2d 61 6c 69 73 74 20 | 71 75 61 69 6c 2d 6d 6f |p-alist |quail-mo|
|00002d00| 64 65 2d 6d 61 70 20 6c | 6f 63 61 6c 2d 76 61 72 |de-map l|ocal-var|
|00002d10| 69 61 62 6c 65 2d 70 20 | 6e 69 6c 20 64 65 66 61 |iable-p |nil defa|
|00002d20| 75 6c 74 2d 76 61 6c 75 | 65 20 6d 61 70 20 73 65 |ult-valu|e map se|
|00002d30| 74 2d 64 65 66 61 75 6c | 74 5d 20 34 29 0a 23 40 |t-defaul|t] 4).#@|
|00002d40| 32 32 38 20 4b 65 79 6d | 61 70 20 75 73 65 64 20 |228 Keym|ap used |
|00002d50| 70 72 6f 63 65 73 73 69 | 6e 67 20 74 72 61 6e 73 |processi|ng trans|
|00002d60| 6c 61 74 69 6f 6e 20 69 | 6e 20 63 6f 6d 70 6c 65 |lation i|n comple|
|00002d70| 78 20 51 75 61 69 6c 20 | 6d 6f 64 65 73 2e 0a 4f |x Quail |modes..O|
|00002d80| 6e 6c 79 20 61 20 66 65 | 77 20 65 73 70 65 63 69 |nly a fe|w especi|
|00002d90| 61 6c 6c 79 20 63 6f 6d | 70 6c 65 78 20 69 6e 70 |ally com|plex inp|
|00002da0| 75 74 20 6d 65 74 68 6f | 64 73 20 75 73 65 20 74 |ut metho|ds use t|
|00002db0| 68 69 73 20 6d 61 70 3b | 0a 6d 6f 73 74 20 75 73 |his map;|.most us|
|00002dc0| 65 20 60 71 75 61 69 6c | 2d 73 69 6d 70 6c 65 2d |e `quail|-simple-|
|00002dd0| 74 72 61 6e 73 6c 61 74 | 69 6f 6e 2d 6b 65 79 6d |translat|ion-keym|
|00002de0| 61 70 27 20 69 6e 73 74 | 65 61 64 2e 0a 54 68 69 |ap' inst|ead..Thi|
|00002df0| 73 20 6d 61 70 20 69 73 | 20 61 63 74 69 76 61 74 |s map is| activat|
|00002e00| 65 64 20 77 68 69 6c 65 | 20 74 72 61 6e 73 6c 61 |ed while| transla|
|00002e10| 74 69 6f 6e 20 72 65 67 | 69 6f 6e 20 69 73 20 61 |tion reg|ion is a|
|00002e20| 63 74 69 76 65 2e 1f 0a | 28 64 65 66 76 61 72 20 |ctive...|(defvar |
|00002e30| 71 75 61 69 6c 2d 74 72 | 61 6e 73 6c 61 74 69 6f |quail-tr|anslatio|
|00002e40| 6e 2d 6b 65 79 6d 61 70 | 20 28 62 79 74 65 2d 63 |n-keymap| (byte-c|
|00002e50| 6f 64 65 20 22 c0 20 c1 | 1a 1b 5c 6e c4 57 ab 8e |ode ". .|..\n.W..|
|00002e60| c5 0b c6 5c 6e 21 c7 23 | 88 5c 6e 54 89 12 aa 6e |...\n!.#|.\nT...n|
|00002e70| 5c 6e c8 57 ab 8e c5 0b | c6 5c 6e 21 c9 23 88 5c |\n.W....|.\n!.#.\|
|00002e80| 6e 54 89 12 aa 6e c5 0b | ca cb 23 88 c5 0b cc cd |nT...n..|..#.....|
|00002e90| 23 88 c5 0b ce cf 23 88 | c5 0b d0 d1 23 88 c5 0b |#.....#.|....#...|
|00002ea0| d2 d3 23 88 c5 0b d4 d5 | 23 88 c5 0b d6 d7 23 88 |..#.....|#.....#.|
|00002eb0| c5 0b d8 d9 23 88 c5 0b | da d7 23 88 c5 0b db d5 |....#...|..#.....|
|00002ec0| 23 88 c5 0b dc cb 23 88 | c5 0b dd cb 23 88 de 20 |#.....#.|....#.. |
|00002ed0| 1e 1f e0 0e 21 21 ab 8a | c5 0b c6 0e 21 21 0e 1f |....!!..|....!!..|
|00002ee0| 23 88 c5 0b e2 0e 1f 23 | 88 29 e0 0e 21 21 ab 8a |#......#|.)..!!..|
|00002ef0| c5 0b e3 0e 21 e4 5c 22 | c7 23 88 e5 0b c7 5c 22 |....!.\"|.#....\"|
|00002f00| 88 0b 2a 87 22 20 5b 6d | 61 6b 65 2d 6b 65 79 6d |..*." [m|ake-keym|
|00002f10| 61 70 20 30 20 69 20 6d | 61 70 20 3f 5c 20 20 64 |ap 0 i m|ap ?\  d|
|00002f20| 65 66 69 6e 65 2d 6b 65 | 79 20 63 68 61 72 2d 74 |efine-ke|y char-t|
|00002f30| 6f 2d 73 74 72 69 6e 67 | 20 71 75 61 69 6c 2d 65 |o-string| quail-e|
|00002f40| 78 65 63 75 74 65 2d 6e | 6f 6e 2d 71 75 61 69 6c |xecute-n|on-quail|
|00002f50| 2d 63 6f 6d 6d 61 6e 64 | 20 31 32 37 20 71 75 61 |-command| 127 qua|
|00002f60| 69 6c 2d 73 65 6c 66 2d | 69 6e 73 65 72 74 2d 63 |il-self-|insert-c|
|00002f70| 6f 6d 6d 61 6e 64 20 22 | 7f 22 20 71 75 61 69 6c |ommand "|." quail|
|00002f80| 2d 64 65 6c 65 74 65 2d | 6c 61 73 74 2d 63 68 61 |-delete-|last-cha|
|00002f90| 72 20 22 06 22 20 71 75 | 61 69 6c 2d 6e 65 78 74 |r "." qu|ail-next|
|00002fa0| 2d 74 72 61 6e 73 6c 61 | 74 69 6f 6e 20 22 02 22 |-transla|tion "."|
|00002fb0| 20 71 75 61 69 6c 2d 70 | 72 65 76 2d 74 72 61 6e | quail-p|rev-tran|
|00002fc0| 73 6c 61 74 69 6f 6e 20 | 22 0e 22 20 71 75 61 69 |slation |"." quai|
|00002fd0| 6c 2d 6e 65 78 74 2d 74 | 72 61 6e 73 6c 61 74 69 |l-next-t|ranslati|
|00002fe0| 6f 6e 2d 62 6c 6f 63 6b | 20 22 10 22 20 71 75 61 |on-block| "." qua|
|00002ff0| 69 6c 2d 70 72 65 76 2d | 74 72 61 6e 73 6c 61 74 |il-prev-|translat|
|00003000| 69 6f 6e 2d 62 6c 6f 63 | 6b 20 22 09 22 20 71 75 |ion-bloc|k "." qu|
|00003010| 61 69 6c 2d 63 6f 6d 70 | 6c 65 74 69 6f 6e 20 22 |ail-comp|letion "|
|00003020| 00 22 20 71 75 61 69 6c | 2d 73 65 6c 65 63 74 2d |." quail|-select-|
|00003030| 63 75 72 72 65 6e 74 20 | 22 08 22 20 71 75 61 69 |current |"." quai|
|00003040| 6c 2d 74 72 61 6e 73 6c | 61 74 69 6f 6e 2d 68 65 |l-transl|ation-he|
|00003050| 6c 70 20 5b 3f 5c 5e 40 | 5d 20 5b 74 61 62 5d 20 |lp [?\^@|] [tab] |
|00003060| 5b 64 65 6c 65 74 65 5d | 20 5b 62 61 63 6b 73 70 |[delete]| [backsp|
|00003070| 61 63 65 5d 20 6d 61 6b | 65 2d 73 70 61 72 73 65 |ace] mak|e-sparse|
|00003080| 2d 6b 65 79 6d 61 70 20 | 6d 65 74 61 2d 6d 61 70 |-keymap |meta-map|
|00003090| 20 63 68 61 72 61 63 74 | 65 72 70 20 6d 65 74 61 | charact|erp meta|
|000030a0| 2d 70 72 65 66 69 78 2d | 63 68 61 72 20 5b 65 73 |-prefix-|char [es|
|000030b0| 63 61 70 65 5d 20 76 65 | 63 74 6f 72 20 74 20 73 |cape] ve|ctor t s|
|000030c0| 65 74 2d 6b 65 79 6d 61 | 70 2d 64 65 66 61 75 6c |et-keyma|p-defaul|
|000030d0| 74 2d 62 69 6e 64 69 6e | 67 5d 20 36 29 20 28 23 |t-bindin|g] 6) (#|
|000030e0| 24 20 2e 20 31 31 35 38 | 38 29 29 0a 23 40 32 30 |$ . 1158|8)).#@20|
|000030f0| 33 20 4b 65 79 6d 61 70 | 20 75 73 65 64 20 77 68 |3 Keymap| used wh|
|00003100| 69 6c 65 20 70 72 6f 63 | 65 73 73 69 6e 67 20 74 |ile proc|essing t|
|00003110| 72 61 6e 73 6c 61 74 69 | 6f 6e 20 69 6e 20 73 69 |ranslati|on in si|
|00003120| 6d 70 6c 65 20 51 75 61 | 69 6c 20 6d 6f 64 65 73 |mple Qua|il modes|
|00003130| 2e 0a 41 20 66 65 77 20 | 65 73 70 65 63 69 61 6c |..A few |especial|
|00003140| 6c 79 20 63 6f 6d 70 6c | 65 78 20 69 6e 70 75 74 |ly compl|ex input|
|00003150| 20 6d 65 74 68 6f 64 73 | 20 75 73 65 20 60 71 75 | methods| use `qu|
|00003160| 61 69 6c 2d 2d 74 72 61 | 6e 73 6c 61 74 69 6f 6e |ail--tra|nslation|
|00003170| 2d 6b 65 79 6d 61 70 27 | 20 69 6e 73 74 65 61 64 |-keymap'| instead|
|00003180| 2e 0a 54 68 69 73 20 6d | 61 70 20 69 73 20 61 63 |..This m|ap is ac|
|00003190| 74 69 76 61 74 65 64 20 | 77 68 69 6c 65 20 74 72 |tivated |while tr|
|000031a0| 61 6e 73 6c 61 74 69 6f | 6e 20 72 65 67 69 6f 6e |anslatio|n region|
|000031b0| 20 69 73 20 61 63 74 69 | 76 65 2e 1f 0a 28 64 65 | is acti|ve...(de|
|000031c0| 66 76 61 72 20 71 75 61 | 69 6c 2d 73 69 6d 70 6c |fvar qua|il-simpl|
|000031d0| 65 2d 74 72 61 6e 73 6c | 61 74 69 6f 6e 2d 6b 65 |e-transl|ation-ke|
|000031e0| 79 6d 61 70 20 28 62 79 | 74 65 2d 63 6f 64 65 20 |ymap (by|te-code |
|000031f0| 22 c0 20 c1 1a 1b 5c 6e | c4 57 ab 8e c5 0b c6 5c |". ...\n|.W.....\|
|00003200| 6e 21 c7 23 88 5c 6e 54 | 89 12 aa 6e 5c 6e c8 57 |n!.#.\nT|...n\n.W|
|00003210| ab 8e c5 0b c6 5c 6e 21 | c9 23 88 5c 6e 54 89 12 |.....\n!|.#.\nT..|
|00003220| aa 6e c5 0b ca cb 23 88 | c5 0b cc cb 23 88 c5 0b |.n....#.|....#...|
|00003230| cd cb 23 88 ce 20 1e 0f | d0 0e 11 21 ab 8a c5 0b |..#.. ..|...!....|
|00003240| c6 0e 11 21 0e 0f 23 88 | c5 0b d2 0e 0f 23 88 29 |...!..#.|.....#.)|
|00003250| d0 0e 11 21 ab 8a c5 0b | d3 0e 11 d4 5c 22 c7 23 |...!....|....\".#|
|00003260| 88 d5 0b c7 5c 22 88 0b | 2a 87 22 20 5b 6d 61 6b |....\"..|*." [mak|
|00003270| 65 2d 6b 65 79 6d 61 70 | 20 30 20 69 20 6d 61 70 |e-keymap| 0 i map|
|00003280| 20 3f 5c 20 20 64 65 66 | 69 6e 65 2d 6b 65 79 20 | ?\  def|ine-key |
|00003290| 63 68 61 72 2d 74 6f 2d | 73 74 72 69 6e 67 20 71 |char-to-|string q|
|000032a0| 75 61 69 6c 2d 65 78 65 | 63 75 74 65 2d 6e 6f 6e |uail-exe|cute-non|
|000032b0| 2d 71 75 61 69 6c 2d 63 | 6f 6d 6d 61 6e 64 20 31 |-quail-c|ommand 1|
|000032c0| 32 37 20 71 75 61 69 6c | 2d 73 65 6c 66 2d 69 6e |27 quail|-self-in|
|000032d0| 73 65 72 74 2d 63 6f 6d | 6d 61 6e 64 20 22 7f 22 |sert-com|mand "."|
|000032e0| 20 71 75 61 69 6c 2d 64 | 65 6c 65 74 65 2d 6c 61 | quail-d|elete-la|
|000032f0| 73 74 2d 63 68 61 72 20 | 5b 64 65 6c 65 74 65 5d |st-char |[delete]|
|00003300| 20 5b 62 61 63 6b 73 70 | 61 63 65 5d 20 6d 61 6b | [backsp|ace] mak|
|00003310| 65 2d 73 70 61 72 73 65 | 2d 6b 65 79 6d 61 70 20 |e-sparse|-keymap |
|00003320| 6d 65 74 61 2d 6d 61 70 | 20 63 68 61 72 61 63 74 |meta-map| charact|
|00003330| 65 72 70 20 6d 65 74 61 | 2d 70 72 65 66 69 78 2d |erp meta|-prefix-|
|00003340| 63 68 61 72 20 5b 65 73 | 63 61 70 65 5d 20 76 65 |char [es|cape] ve|
|00003350| 63 74 6f 72 20 74 20 73 | 65 74 2d 6b 65 79 6d 61 |ctor t s|et-keyma|
|00003360| 70 2d 64 65 66 61 75 6c | 74 2d 62 69 6e 64 69 6e |p-defaul|t-bindin|
|00003370| 67 5d 20 36 29 20 28 23 | 24 20 2e 20 31 32 35 33 |g] 6) (#|$ . 1253|
|00003380| 30 29 29 0a 23 40 31 34 | 37 20 4b 65 79 6d 61 70 |0)).#@14|7 Keymap|
|00003390| 20 75 73 65 64 20 66 6f | 72 20 70 72 6f 63 65 73 | used fo|r proces|
|000033a0| 73 69 6e 67 20 63 6f 6e | 76 65 72 73 69 6f 6e 20 |sing con|version |
|000033b0| 69 6e 20 51 75 61 69 6c | 20 6d 6f 64 65 2e 0a 54 |in Quail| mode..T|
|000033c0| 68 69 73 20 6d 61 70 20 | 69 73 20 61 63 74 69 76 |his map |is activ|
|000033d0| 61 74 65 64 20 77 68 69 | 6c 65 20 63 6f 6e 76 65 |ated whi|le conve|
|000033e0| 73 69 6f 6e 20 72 65 67 | 69 6f 6e 20 69 73 20 61 |sion reg|ion is a|
|000033f0| 63 74 69 76 65 20 62 75 | 74 20 74 72 61 6e 73 6c |ctive bu|t transl|
|00003400| 61 74 69 6f 6e 0a 72 65 | 67 69 6f 6e 20 69 73 20 |ation.re|gion is |
|00003410| 6e 6f 74 20 61 63 74 69 | 76 65 2e 1f 0a 28 64 65 |not acti|ve...(de|
|00003420| 66 76 61 72 20 71 75 61 | 69 6c 2d 63 6f 6e 76 65 |fvar qua|il-conve|
|00003430| 72 73 69 6f 6e 2d 6b 65 | 79 6d 61 70 20 28 62 79 |rsion-ke|ymap (by|
|00003440| 74 65 2d 63 6f 64 65 20 | 22 c0 20 c1 1a 1b 5c 6e |te-code |". ...\n|
|00003450| c4 57 ab 8e c5 0b c6 5c | 6e 21 c7 23 88 5c 6e 54 |.W.....\|n!.#.\nT|
|00003460| 89 12 aa 6e 5c 6e c8 57 | ab 8e c5 0b c6 5c 6e 21 |...n\n.W|.....\n!|
|00003470| c9 23 88 5c 6e 54 89 12 | aa 6e c5 0b ca cb 23 88 |.#.\nT..|.n....#.|
|00003480| c5 0b cc cd 23 88 c5 0b | ce cf 23 88 c5 0b d0 d1 |....#...|..#.....|
|00003490| 23 88 c5 0b d2 d3 23 88 | c5 0b d4 d5 23 88 c5 0b |#.....#.|....#...|
|000034a0| d6 d7 23 88 c5 0b d8 d7 | 23 88 c5 0b d9 d7 23 88 |..#.....|#.....#.|
|000034b0| da 20 1e 1b dc 0e 1d 21 | ab 8a c5 0b c6 0e 1d 21 |. .....!|.......!|
|000034c0| 0e 1b 23 88 c5 0b de 0e | 1b 23 88 29 dc 0e 1d 21 |..#.....|.#.)...!|
|000034d0| ab 8a c5 0b df 0e 1d e0 | 5c 22 c7 23 88 e1 0b c7 |........|\".#....|
|000034e0| 5c 22 88 0b 2a 87 22 20 | 5b 6d 61 6b 65 2d 6b 65 |\"..*." |[make-ke|
|000034f0| 79 6d 61 70 20 30 20 69 | 20 6d 61 70 20 3f 5c 20 |ymap 0 i| map ?\ |
|00003500| 20 64 65 66 69 6e 65 2d | 6b 65 79 20 63 68 61 72 | define-|key char|
|00003510| 2d 74 6f 2d 73 74 72 69 | 6e 67 20 71 75 61 69 6c |-to-stri|ng quail|
|00003520| 2d 65 78 65 63 75 74 65 | 2d 6e 6f 6e 2d 71 75 61 |-execute|-non-qua|
|00003530| 69 6c 2d 63 6f 6d 6d 61 | 6e 64 20 31 32 37 20 71 |il-comma|nd 127 q|
|00003540| 75 61 69 6c 2d 73 74 61 | 72 74 2d 74 72 61 6e 73 |uail-sta|rt-trans|
|00003550| 6c 61 74 69 6f 6e 2d 69 | 6e 2d 63 6f 6e 76 65 72 |lation-i|n-conver|
|00003560| 73 69 6f 6e 2d 6d 6f 64 | 65 20 22 02 22 20 71 75 |sion-mod|e "." qu|
|00003570| 61 69 6c 2d 63 6f 6e 76 | 65 72 73 69 6f 6e 2d 62 |ail-conv|ersion-b|
|00003580| 61 63 6b 77 61 72 64 2d | 63 68 61 72 20 22 06 22 |ackward-|char "."|
|00003590| 20 71 75 61 69 6c 2d 63 | 6f 6e 76 65 72 73 69 6f | quail-c|onversio|
|000035a0| 6e 2d 66 6f 72 77 61 72 | 64 2d 63 68 61 72 20 22 |n-forwar|d-char "|
|000035b0| 01 22 20 71 75 61 69 6c | 2d 63 6f 6e 76 65 72 73 |." quail|-convers|
|000035c0| 69 6f 6e 2d 62 65 67 69 | 6e 6e 69 6e 67 2d 6f 66 |ion-begi|nning-of|
|000035d0| 2d 72 65 67 69 6f 6e 20 | 22 05 22 20 71 75 61 69 |-region |"." quai|
|000035e0| 6c 2d 63 6f 6e 76 65 72 | 73 69 6f 6e 2d 65 6e 64 |l-conver|sion-end|
|000035f0| 2d 6f 66 2d 72 65 67 69 | 6f 6e 20 22 04 22 20 71 |-of-regi|on "." q|
|00003600| 75 61 69 6c 2d 63 6f 6e | 76 65 72 73 69 6f 6e 2d |uail-con|version-|
|00003610| 64 65 6c 65 74 65 2d 63 | 68 61 72 20 22 08 22 20 |delete-c|har "." |
|00003620| 71 75 61 69 6c 2d 63 6f | 6e 76 65 72 73 69 6f 6e |quail-co|nversion|
|00003630| 2d 68 65 6c 70 20 22 7f | 22 20 71 75 61 69 6c 2d |-help ".|" quail-|
|00003640| 63 6f 6e 76 65 72 73 69 | 6f 6e 2d 62 61 63 6b 77 |conversi|on-backw|
|00003650| 61 72 64 2d 64 65 6c 65 | 74 65 2d 63 68 61 72 20 |ard-dele|te-char |
|00003660| 5b 64 65 6c 65 74 65 5d | 20 5b 62 61 63 6b 73 70 |[delete]| [backsp|
|00003670| 61 63 65 5d 20 6d 61 6b | 65 2d 73 70 61 72 73 65 |ace] mak|e-sparse|
|00003680| 2d 6b 65 79 6d 61 70 20 | 6d 65 74 61 2d 6d 61 70 |-keymap |meta-map|
|00003690| 20 63 68 61 72 61 63 74 | 65 72 70 20 6d 65 74 61 | charact|erp meta|
|000036a0| 2d 70 72 65 66 69 78 2d | 63 68 61 72 20 5b 65 73 |-prefix-|char [es|
|000036b0| 63 61 70 65 5d 20 76 65 | 63 74 6f 72 20 74 20 73 |cape] ve|ctor t s|
|000036c0| 65 74 2d 6b 65 79 6d 61 | 70 2d 64 65 66 61 75 6c |et-keyma|p-defaul|
|000036d0| 74 2d 62 69 6e 64 69 6e | 67 5d 20 36 29 20 28 23 |t-bindin|g] 6) (#|
|000036e0| 24 20 2e 20 31 33 31 39 | 34 29 29 0a 23 40 33 35 |$ . 1319|4)).#@35|
|000036f0| 31 35 20 44 65 66 69 6e | 65 20 4e 41 4d 45 20 61 |15 Defin|e NAME a|
|00003700| 73 20 61 20 6e 65 77 20 | 51 75 61 69 6c 20 70 61 |s a new |Quail pa|
|00003710| 63 6b 61 67 65 20 66 6f | 72 20 69 6e 70 75 74 20 |ckage fo|r input |
|00003720| 4c 41 4e 47 55 41 47 45 | 2e 0a 54 49 54 4c 45 20 |LANGUAGE|..TITLE |
|00003730| 69 73 20 61 20 73 74 72 | 69 6e 67 20 74 6f 20 62 |is a str|ing to b|
|00003740| 65 20 64 69 73 70 6c 61 | 79 65 64 20 61 74 20 6d |e displa|yed at m|
|00003750| 6f 64 65 2d 6c 69 6e 65 | 20 74 6f 20 69 6e 64 69 |ode-line| to indi|
|00003760| 63 61 74 65 20 74 68 69 | 73 20 70 61 63 6b 61 67 |cate thi|s packag|
|00003770| 65 2e 0a 4f 70 74 69 6f | 6e 61 6c 20 61 72 67 75 |e..Optio|nal argu|
|00003780| 6d 65 6e 74 73 20 61 72 | 65 20 47 55 49 44 41 4e |ments ar|e GUIDAN|
|00003790| 43 45 2c 20 44 4f 43 53 | 54 52 49 4e 47 2c 20 54 |CE, DOCS|TRING, T|
|000037a0| 52 41 4e 4c 53 41 54 49 | 4f 4e 2d 4b 45 59 53 2c |RANLSATI|ON-KEYS,|
|000037b0| 0a 20 46 4f 52 47 45 54 | 2d 4c 41 53 54 2d 53 45 |. FORGET|-LAST-SE|
|000037c0| 4c 45 43 54 49 4f 4e 2c | 20 44 45 54 45 52 4d 49 |LECTION,| DETERMI|
|000037d0| 4e 49 53 54 49 43 2c 20 | 4b 42 44 2d 54 52 41 4e |NISTIC, |KBD-TRAN|
|000037e0| 53 4c 41 54 45 2c 20 53 | 48 4f 57 2d 4c 41 59 4f |SLATE, S|HOW-LAYO|
|000037f0| 55 54 2c 0a 20 43 52 45 | 41 54 45 2d 44 45 43 4f |UT,. CRE|ATE-DECO|
|00003800| 44 45 2d 4d 41 50 2c 20 | 4d 41 58 49 4d 55 4d 2d |DE-MAP, |MAXIMUM-|
|00003810| 53 48 4f 52 54 45 53 54 | 2c 20 4f 56 45 52 4c 41 |SHORTEST|, OVERLA|
|00003820| 59 2d 50 4c 49 53 54 2c | 0a 20 55 50 44 41 54 45 |Y-PLIST,|. UPDATE|
|00003830| 2d 54 52 41 4e 53 4c 41 | 54 49 4f 4e 2d 46 55 4e |-TRANSLA|TION-FUN|
|00003840| 43 54 49 4f 4e 2c 20 43 | 4f 4e 56 45 52 53 49 4f |CTION, C|ONVERSIO|
|00003850| 4e 2d 4b 45 59 53 20 61 | 6e 64 20 53 49 4d 50 4c |N-KEYS a|nd SIMPL|
|00003860| 45 2e 0a 0a 47 55 49 44 | 41 4e 43 45 20 73 70 65 |E...GUID|ANCE spe|
|00003870| 63 69 66 69 65 73 20 68 | 6f 77 20 61 20 67 75 69 |cifies h|ow a gui|
|00003880| 64 61 6e 63 65 20 73 74 | 72 69 6e 67 20 69 73 20 |dance st|ring is |
|00003890| 73 68 6f 77 6e 20 69 6e | 20 65 63 68 6f 20 61 72 |shown in| echo ar|
|000038a0| 65 61 2e 0a 49 66 20 69 | 74 20 69 73 20 74 2c 20 |ea..If i|t is t, |
|000038b0| 6c 69 73 74 20 6f 66 20 | 61 6c 6c 20 70 6f 73 73 |list of |all poss|
|000038c0| 69 62 6c 65 20 74 72 61 | 6e 73 6c 61 74 69 6f 6e |ible tra|nslation|
|000038d0| 73 20 66 6f 72 20 74 68 | 65 20 63 75 72 72 65 6e |s for th|e curren|
|000038e0| 74 20 6b 65 79 20 69 73 | 20 73 68 6f 77 6e 0a 20 |t key is| shown. |
|000038f0| 77 69 74 68 20 74 68 65 | 20 63 75 72 72 65 6e 74 |with the| current|
|00003900| 6c 79 20 73 65 6c 65 63 | 74 65 64 20 74 72 61 6e |ly selec|ted tran|
|00003910| 73 6c 61 74 69 6f 6e 20 | 62 65 69 6e 67 20 68 69 |slation |being hi|
|00003920| 67 68 6c 69 67 68 74 65 | 64 2e 0a 49 66 20 69 74 |ghlighte|d..If it|
|00003930| 20 69 73 20 61 6e 20 61 | 6c 69 73 74 2c 20 74 68 | is an a|list, th|
|00003940| 65 20 65 6c 65 6d 65 6e | 74 20 68 61 73 20 74 68 |e elemen|t has th|
|00003950| 65 20 66 6f 72 6d 20 28 | 43 48 41 52 20 2e 20 53 |e form (|CHAR . S|
|00003960| 54 52 49 4e 47 29 2e 20 | 20 45 61 63 68 20 63 68 |TRING). | Each ch|
|00003970| 61 72 61 63 74 65 72 0a | 20 69 6e 20 74 68 65 20 |aracter.| in the |
|00003980| 63 75 72 72 65 6e 74 20 | 6b 65 79 20 69 73 20 73 |current |key is s|
|00003990| 65 61 72 63 68 65 64 20 | 69 6e 20 74 68 65 20 6c |earched |in the l|
|000039a0| 69 73 74 20 61 6e 64 20 | 74 68 65 20 63 6f 72 72 |ist and |the corr|
|000039b0| 65 73 70 6f 6e 64 69 6e | 67 20 73 74 72 69 6e 67 |espondin|g string|
|000039c0| 20 69 73 0a 20 73 68 6f | 77 6e 2e 0a 49 66 20 69 | is. sho|wn..If i|
|000039d0| 74 20 69 73 20 6e 69 6c | 2c 20 74 68 65 20 63 75 |t is nil|, the cu|
|000039e0| 72 72 65 6e 74 20 6b 65 | 79 20 69 73 20 73 68 6f |rrent ke|y is sho|
|000039f0| 77 6e 2e 0a 0a 44 4f 43 | 53 54 52 49 4e 47 20 69 |wn...DOC|STRING i|
|00003a00| 73 20 74 68 65 20 64 6f | 63 75 6d 65 6e 74 61 74 |s the do|cumentat|
|00003a10| 69 6f 6e 20 73 74 72 69 | 6e 67 20 6f 66 20 74 68 |ion stri|ng of th|
|00003a20| 69 73 20 70 61 63 6b 61 | 67 65 2e 0a 0a 54 52 41 |is packa|ge...TRA|
|00003a30| 4e 53 4c 41 54 49 4f 4e | 2d 4b 45 59 53 20 73 70 |NSLATION|-KEYS sp|
|00003a40| 65 63 69 66 69 65 73 20 | 61 64 64 69 74 69 6f 6e |ecifies |addition|
|00003a50| 61 6c 20 6b 65 79 20 62 | 69 6e 64 69 6e 67 73 20 |al key b|indings |
|00003a60| 75 73 65 64 20 77 68 69 | 6c 65 20 74 72 61 6e 73 |used whi|le trans|
|00003a70| 6c 61 74 69 6f 6e 0a 72 | 65 67 69 6f 6e 20 69 73 |lation.r|egion is|
|00003a80| 20 61 63 74 69 76 65 2e | 20 20 49 74 20 69 73 20 | active.|  It is |
|00003a90| 61 6e 20 61 6c 69 73 74 | 20 6f 66 20 73 69 6e 67 |an alist| of sing|
|00003aa0| 6c 65 20 6b 65 79 20 63 | 68 61 72 61 63 74 65 72 |le key c|haracter|
|00003ab0| 20 76 73 2e 20 63 6f 72 | 72 65 73 70 6f 6e 64 69 | vs. cor|respondi|
|00003ac0| 6e 67 0a 63 6f 6d 6d 61 | 6e 64 20 74 6f 20 62 65 |ng.comma|nd to be|
|00003ad0| 20 63 61 6c 6c 65 64 2e | 0a 0a 46 4f 52 47 45 54 | called.|..FORGET|
|00003ae0| 2d 4c 41 53 54 2d 53 45 | 4c 45 43 54 49 4f 4e 20 |-LAST-SE|LECTION |
|00003af0| 6e 6f 6e 2d 6e 69 6c 20 | 6d 65 61 6e 73 20 61 20 |non-nil |means a |
|00003b00| 73 65 6c 65 63 74 65 64 | 20 74 72 61 6e 73 6c 61 |selected| transla|
|00003b10| 74 69 6f 6e 20 69 73 20 | 6e 6f 74 20 6b 65 70 74 |tion is |not kept|
|00003b20| 0a 66 6f 72 20 74 68 65 | 20 66 75 74 75 72 65 20 |.for the| future |
|00003b30| 74 6f 20 74 72 61 6e 73 | 6c 61 74 65 20 74 68 65 |to trans|late the|
|00003b40| 20 73 61 6d 65 20 6b 65 | 79 2e 20 20 49 66 20 74 | same ke|y.  If t|
|00003b50| 68 69 73 20 66 6c 61 67 | 20 69 73 20 6e 69 6c 2c |his flag| is nil,|
|00003b60| 20 61 0a 74 72 61 6e 73 | 6c 61 74 69 6f 6e 20 73 | a.trans|lation s|
|00003b70| 65 6c 65 63 74 65 64 20 | 66 6f 72 20 61 20 6b 65 |elected |for a ke|
|00003b80| 79 20 69 73 20 72 65 6d | 65 6d 62 65 72 65 64 20 |y is rem|embered |
|00003b90| 73 6f 20 74 68 61 74 20 | 69 74 20 63 61 6e 20 62 |so that |it can b|
|00003ba0| 65 20 74 68 65 0a 66 69 | 72 73 74 20 63 61 6e 64 |e the.fi|rst cand|
|00003bb0| 69 64 61 74 65 20 77 68 | 65 6e 20 74 68 65 20 73 |idate wh|en the s|
|00003bc0| 61 6d 65 20 6b 65 79 20 | 69 73 20 65 6e 74 65 72 |ame key |is enter|
|00003bd0| 65 64 20 6c 61 74 65 72 | 2e 0a 0a 44 45 54 45 52 |ed later|...DETER|
|00003be0| 4d 49 4e 49 53 54 49 43 | 20 6e 6f 6e 2d 6e 69 6c |MINISTIC| non-nil|
|00003bf0| 20 6d 65 61 6e 73 20 74 | 68 65 20 66 69 72 73 74 | means t|he first|
|00003c00| 20 63 61 6e 64 69 64 61 | 74 65 20 6f 66 20 74 72 | candida|te of tr|
|00003c10| 61 6e 73 6c 61 74 69 6f | 6e 20 69 73 0a 73 65 6c |anslatio|n is.sel|
|00003c20| 65 63 74 65 64 20 61 75 | 74 6f 6d 61 74 69 63 61 |ected au|tomatica|
|00003c30| 6c 6c 79 20 77 69 74 68 | 6f 75 74 20 61 6c 6c 6f |lly with|out allo|
|00003c40| 77 69 6e 67 20 75 73 65 | 72 73 20 74 6f 20 73 65 |wing use|rs to se|
|00003c50| 6c 65 63 74 20 61 6e 6f | 74 68 65 72 0a 74 72 61 |lect ano|ther.tra|
|00003c60| 6e 73 6c 61 74 69 6f 6e | 20 66 6f 72 20 61 20 6b |nslation| for a k|
|00003c70| 65 79 2e 20 20 49 6e 20 | 74 68 69 73 20 63 61 73 |ey.  In |this cas|
|00003c80| 65 2c 20 75 6e 73 65 6c | 65 63 74 65 64 20 74 72 |e, unsel|ected tr|
|00003c90| 61 6e 73 6c 61 74 69 6f | 6e 73 20 61 72 65 20 6f |anslatio|ns are o|
|00003ca0| 66 0a 6e 6f 20 75 73 65 | 20 66 6f 72 20 61 6e 20 |f.no use| for an |
|00003cb0| 69 6e 74 65 72 61 63 74 | 69 76 65 20 75 73 65 20 |interact|ive use |
|00003cc0| 6f 66 20 51 75 61 69 6c | 20 62 75 74 20 63 61 6e |of Quail| but can|
|00003cd0| 20 62 65 20 75 73 65 64 | 20 62 79 20 73 6f 6d 65 | be used| by some|
|00003ce0| 20 6f 74 68 65 72 0a 70 | 72 6f 67 72 61 6d 73 2e | other.p|rograms.|
|00003cf0| 20 20 49 66 20 74 68 69 | 73 20 66 6c 61 67 20 69 |  If thi|s flag i|
|00003d00| 73 20 6e 6f 6e 2d 6e 69 | 6c 2c 20 46 4f 52 47 45 |s non-ni|l, FORGE|
|00003d10| 54 2d 4c 41 53 54 2d 53 | 45 4c 45 43 54 49 4f 4e |T-LAST-S|ELECTION|
|00003d20| 20 69 73 20 61 6c 73 6f | 20 73 65 74 0a 74 6f 20 | is also| set.to |
|00003d30| 74 2e 0a 0a 4b 42 44 2d | 54 52 41 4e 53 4c 41 54 |t...KBD-|TRANSLAT|
|00003d40| 45 20 6e 6f 6e 2d 6e 69 | 6c 20 6d 65 61 6e 73 20 |E non-ni|l means |
|00003d50| 69 6e 70 75 74 20 63 68 | 61 72 61 63 74 65 72 73 |input ch|aracters|
|00003d60| 20 61 72 65 20 74 72 61 | 6e 73 6c 61 74 65 64 20 | are tra|nslated |
|00003d70| 66 72 6f 6d 20 61 0a 75 | 73 65 72 27 73 20 6b 65 |from a.u|ser's ke|
|00003d80| 79 62 6f 61 72 64 20 6c | 61 79 6f 75 74 20 74 6f |yboard l|ayout to|
|00003d90| 20 74 68 65 20 73 74 61 | 6e 64 61 72 64 20 6b 65 | the sta|ndard ke|
|00003da0| 79 62 6f 61 72 64 20 6c | 61 79 6f 75 74 2e 20 20 |yboard l|ayout.  |
|00003db0| 53 65 65 20 74 68 65 0a | 64 6f 63 75 6d 65 6e 74 |See the.|document|
|00003dc0| 61 74 69 6f 6e 20 6f 66 | 20 60 71 75 61 69 6c 2d |ation of| `quail-|
|00003dd0| 6b 65 79 62 6f 61 72 64 | 2d 6c 61 79 6f 75 74 27 |keyboard|-layout'|
|00003de0| 20 61 6e 64 0a 60 71 75 | 61 69 6c 2d 6b 65 79 62 | and.`qu|ail-keyb|
|00003df0| 6f 61 72 64 2d 6c 61 79 | 6f 75 74 2d 73 74 61 6e |oard-lay|out-stan|
|00003e00| 64 61 72 64 27 20 66 6f | 72 20 6d 6f 72 65 20 64 |dard' fo|r more d|
|00003e10| 65 74 61 69 6c 2e 0a 0a | 53 48 4f 57 2d 4c 41 59 |etail...|SHOW-LAY|
|00003e20| 4f 55 54 20 6e 6f 6e 2d | 6e 69 6c 20 6d 65 61 6e |OUT non-|nil mean|
|00003e30| 73 20 74 68 65 20 60 71 | 75 61 69 6c 2d 68 65 6c |s the `q|uail-hel|
|00003e40| 70 27 20 63 6f 6d 6d 61 | 6e 64 20 73 68 6f 75 6c |p' comma|nd shoul|
|00003e50| 64 20 73 68 6f 77 0a 74 | 68 65 20 75 73 65 72 27 |d show.t|he user'|
|00003e60| 73 20 6b 65 79 62 6f 61 | 72 64 20 6c 61 79 6f 75 |s keyboa|rd layou|
|00003e70| 74 20 76 69 73 75 61 6c | 6c 79 20 77 69 74 68 20 |t visual|ly with |
|00003e80| 74 72 61 6e 73 6c 61 74 | 65 64 20 63 68 61 72 61 |translat|ed chara|
|00003e90| 63 74 65 72 73 2e 0a 49 | 66 20 4b 42 44 2d 54 52 |cters..I|f KBD-TR|
|00003ea0| 41 4e 53 4c 41 54 45 20 | 69 73 20 73 65 74 2c 20 |ANSLATE |is set, |
|00003eb0| 69 74 20 69 73 20 64 65 | 73 69 72 61 62 6c 65 20 |it is de|sirable |
|00003ec0| 74 6f 20 73 65 74 20 61 | 6c 73 6f 20 74 68 69 73 |to set a|lso this|
|00003ed0| 20 66 6c 61 67 20 75 6e | 6c 65 73 73 0a 74 68 69 | flag un|less.thi|
|00003ee0| 73 20 70 61 63 6b 61 67 | 65 20 64 65 66 69 6e 65 |s packag|e define|
|00003ef0| 73 20 6e 6f 20 74 72 61 | 6e 73 6c 61 74 69 6f 6e |s no tra|nslation|
|00003f00| 73 20 66 6f 72 20 73 69 | 6e 67 6c 65 20 63 68 61 |s for si|ngle cha|
|00003f10| 72 61 63 74 65 72 20 6b | 65 79 73 2e 0a 0a 43 52 |racter k|eys...CR|
|00003f20| 45 41 54 45 2d 44 45 43 | 4f 44 45 2d 4d 41 50 20 |EATE-DEC|ODE-MAP |
|00003f30| 6e 6f 6e 2d 6e 69 6c 20 | 6d 65 61 6e 73 20 64 65 |non-nil |means de|
|00003f40| 63 6f 64 65 20 6d 61 70 | 20 69 73 20 61 6c 73 6f |code map| is also|
|00003f50| 20 63 72 65 61 74 65 64 | 2e 20 20 41 20 64 65 63 | created|.  A dec|
|00003f60| 6f 64 65 0a 6d 61 70 20 | 69 73 20 61 6e 20 61 6c |ode.map |is an al|
|00003f70| 69 73 74 20 6f 66 20 74 | 72 61 6e 73 6c 61 74 69 |ist of t|ranslati|
|00003f80| 6f 6e 73 20 61 6e 64 20 | 63 6f 72 72 65 73 70 6f |ons and |correspo|
|00003f90| 6e 64 69 6e 67 20 6f 72 | 69 67 69 6e 61 6c 20 6b |nding or|iginal k|
|00003fa0| 65 79 73 2e 0a 41 6c 74 | 68 6f 75 67 68 20 74 68 |eys..Alt|hough th|
|00003fb0| 69 73 20 6d 61 70 20 69 | 73 20 6e 6f 74 20 75 73 |is map i|s not us|
|00003fc0| 65 64 20 62 79 20 51 75 | 61 69 6c 20 69 74 73 65 |ed by Qu|ail itse|
|00003fd0| 6c 66 2c 20 69 74 20 63 | 61 6e 20 62 65 20 75 73 |lf, it c|an be us|
|00003fe0| 65 64 20 62 79 20 73 6f | 6d 65 0a 6f 74 68 65 72 |ed by so|me.other|
|00003ff0| 20 70 72 6f 67 72 61 6d | 73 2e 20 20 46 6f 72 20 | program|s.  For |
|00004000| 69 6e 73 74 61 6e 63 65 | 2c 20 56 69 65 74 6e 61 |instance|, Vietna|
|00004010| 6d 65 73 65 20 73 75 70 | 70 6f 72 74 69 6e 67 20 |mese sup|porting |
|00004020| 6e 65 65 64 73 20 74 68 | 69 73 20 6d 61 70 20 74 |needs th|is map t|
|00004030| 6f 0a 63 6f 6e 76 65 72 | 74 20 56 69 65 74 6e 61 |o.conver|t Vietna|
|00004040| 6d 65 73 65 20 74 65 78 | 74 20 74 6f 20 56 49 51 |mese tex|t to VIQ|
|00004050| 52 20 66 6f 72 6d 61 74 | 20 77 68 69 63 68 20 75 |R format| which u|
|00004060| 73 65 73 20 6f 6e 6c 79 | 20 41 53 43 49 49 0a 63 |ses only| ASCII.c|
|00004070| 68 61 72 61 63 74 65 72 | 73 20 74 6f 20 72 65 70 |haracter|s to rep|
|00004080| 72 65 73 65 6e 74 20 56 | 69 65 74 6e 61 6d 65 73 |resent V|ietnames|
|00004090| 65 20 63 68 61 72 61 63 | 74 65 72 73 2e 0a 0a 4d |e charac|ters...M|
|000040a0| 41 58 49 4d 55 4d 2d 53 | 48 4f 52 54 45 53 54 20 |AXIMUM-S|HORTEST |
|000040b0| 6e 6f 6e 2d 6e 69 6c 20 | 6d 65 61 6e 73 20 62 72 |non-nil |means br|
|000040c0| 65 61 6b 20 6b 65 79 20 | 73 65 71 75 65 6e 63 65 |eak key |sequence|
|000040d0| 20 74 6f 20 67 65 74 20 | 6d 61 78 69 6d 75 6d 0a | to get |maximum.|
|000040e0| 6c 65 6e 67 74 68 20 6f | 66 20 74 68 65 20 73 68 |length o|f the sh|
|000040f0| 6f 72 74 65 73 74 20 73 | 65 71 75 65 6e 63 65 2e |ortest s|equence.|
|00004100| 20 20 57 68 65 6e 20 77 | 65 20 64 6f 6e 27 74 20 |  When w|e don't |
|00004110| 68 61 76 65 20 61 20 74 | 72 61 6e 73 6c 61 74 69 |have a t|ranslati|
|00004120| 6f 6e 20 6f 66 0a 6b 65 | 79 20 22 2e 2e 41 42 43 |on of.ke|y "..ABC|
|00004130| 44 22 20 62 75 74 20 68 | 61 76 65 20 74 72 61 6e |D" but h|ave tran|
|00004140| 73 6c 61 74 69 6f 6e 73 | 20 6f 66 20 22 2e 2e 41 |slations| of "..A|
|00004150| 42 22 20 61 6e 64 20 22 | 43 44 2e 2e 22 2c 20 62 |B" and "|CD..", b|
|00004160| 72 65 61 6b 0a 74 68 65 | 20 6b 65 79 20 61 74 20 |reak.the| key at |
|00004170| 22 2e 2e 41 42 22 20 61 | 6e 64 20 73 74 61 72 74 |"..AB" a|nd start|
|00004180| 20 74 72 61 6e 73 6c 61 | 74 69 6f 6e 20 6f 66 20 | transla|tion of |
|00004190| 22 43 44 2e 2e 22 2e 20 | 20 48 61 6e 67 75 6c 0a |"CD..". | Hangul.|
|000041a0| 70 61 63 6b 61 67 65 73 | 2c 20 66 6f 72 20 69 6e |packages|, for in|
|000041b0| 73 74 61 6e 63 65 2c 20 | 75 73 65 20 74 68 69 73 |stance, |use this|
|000041c0| 20 66 61 63 69 6c 69 74 | 79 2e 20 20 49 66 20 74 | facilit|y.  If t|
|000041d0| 68 69 73 20 66 6c 61 67 | 20 69 73 20 6e 69 6c 2c |his flag| is nil,|
|000041e0| 20 77 65 0a 62 72 65 61 | 6b 20 74 68 65 20 6b 65 | we.brea|k the ke|
|000041f0| 79 20 6a 75 73 74 20 61 | 74 20 22 2e 2e 41 42 43 |y just a|t "..ABC|
|00004200| 22 20 61 6e 64 20 73 74 | 61 72 74 20 74 72 61 6e |" and st|art tran|
|00004210| 73 6c 61 74 69 6f 6e 20 | 6f 66 20 22 44 2e 2e 22 |slation |of "D.."|
|00004220| 2e 0a 0a 4f 56 45 52 4c | 41 59 2d 50 4c 49 53 54 |...OVERL|AY-PLIST|
|00004230| 20 69 66 20 6e 6f 6e 2d | 6e 69 6c 20 69 73 20 61 | if non-|nil is a|
|00004240| 20 70 72 6f 70 65 72 74 | 79 20 6c 69 73 74 20 70 | propert|y list p|
|00004250| 75 74 20 6f 6e 20 61 6e | 20 6f 76 65 72 6c 61 79 |ut on an| overlay|
|00004260| 20 77 68 69 63 68 0a 63 | 6f 76 65 72 73 20 51 75 | which.c|overs Qu|
|00004270| 61 69 6c 20 74 72 61 6e | 73 6c 61 74 69 6f 6e 20 |ail tran|slation |
|00004280| 72 65 67 69 6f 6e 2e 0a | 0a 55 50 44 41 54 45 2d |region..|.UPDATE-|
|00004290| 54 52 41 4e 53 4c 41 54 | 49 4f 4e 2d 46 55 4e 43 |TRANSLAT|ION-FUNC|
|000042a0| 54 49 4f 4e 20 69 66 20 | 6e 6f 6e 2d 6e 69 6c 20 |TION if |non-nil |
|000042b0| 69 73 20 61 20 66 75 6e | 63 74 69 6f 6e 20 74 6f |is a fun|ction to|
|000042c0| 20 63 61 6c 6c 20 74 6f | 20 75 70 64 61 74 65 0a | call to| update.|
|000042d0| 74 68 65 20 63 75 72 72 | 65 6e 74 20 74 72 61 6e |the curr|ent tran|
|000042e0| 73 6c 61 74 69 6f 6e 20 | 72 65 67 69 6f 6e 20 61 |slation |region a|
|000042f0| 63 63 6f 64 69 6e 67 20 | 74 6f 20 61 20 6e 65 77 |ccoding |to a new|
|00004300| 20 74 72 61 6e 73 6c 61 | 74 69 6f 6e 20 64 61 74 | transla|tion dat|
|00004310| 61 2e 20 20 42 79 0a 64 | 65 66 61 75 6c 74 2c 20 |a.  By.d|efault, |
|00004320| 61 20 74 72 61 6e 6c 61 | 74 65 64 20 74 65 78 74 |a tranla|ted text|
|00004330| 20 6f 72 20 61 20 75 73 | 65 72 27 73 20 6b 65 79 | or a us|er's key|
|00004340| 20 73 65 71 75 65 6e 63 | 65 20 28 69 66 20 6e 6f | sequenc|e (if no|
|00004350| 20 74 72 61 6e 73 6c 74 | 69 6f 6e 0a 66 6f 72 20 | translt|ion.for |
|00004360| 69 74 29 20 69 73 20 69 | 6e 73 65 72 74 65 64 2e |it) is i|nserted.|
|00004370| 0a 0a 43 4f 4e 56 45 52 | 53 49 4f 4e 2d 4b 45 59 |..CONVER|SION-KEY|
|00004380| 53 20 73 70 65 63 69 66 | 69 65 73 20 61 64 64 69 |S specif|ies addi|
|00004390| 74 69 6f 6e 61 6c 20 6b | 65 79 20 62 69 6e 64 69 |tional k|ey bindi|
|000043a0| 6e 67 73 20 75 73 65 64 | 20 77 68 69 6c 65 0a 63 |ngs used| while.c|
|000043b0| 6f 6e 76 65 72 73 69 6f | 6e 20 72 65 67 69 6f 6e |onversio|n region|
|000043c0| 20 69 73 20 61 63 74 69 | 76 65 2e 20 20 49 74 20 | is acti|ve.  It |
|000043d0| 69 73 20 61 6e 20 61 6c | 69 73 74 20 6f 66 20 73 |is an al|ist of s|
|000043e0| 69 6e 67 6c 65 20 6b 65 | 79 20 63 68 61 72 61 63 |ingle ke|y charac|
|000043f0| 74 65 72 0a 76 73 2e 20 | 63 6f 72 72 65 73 70 6f |ter.vs. |correspo|
|00004400| 6e 64 69 6e 67 20 63 6f | 6d 6d 61 6e 64 20 74 6f |nding co|mmand to|
|00004410| 20 62 65 20 63 61 6c 6c | 65 64 2e 0a 0a 49 66 20 | be call|ed...If |
|00004420| 53 49 4d 50 4c 45 20 69 | 73 20 6e 6f 6e 2d 6e 69 |SIMPLE i|s non-ni|
|00004430| 6c 2c 20 74 68 65 6e 20 | 77 65 20 64 6f 20 6e 6f |l, then |we do no|
|00004440| 74 20 61 6c 74 65 72 20 | 74 68 65 20 6d 65 61 6e |t alter |the mean|
|00004450| 69 6e 67 73 20 6f 66 0a | 63 6f 6d 6d 61 6e 64 73 |ings of.|commands|
|00004460| 20 73 75 63 68 20 61 73 | 20 43 2d 66 2c 20 43 2d | such as| C-f, C-|
|00004470| 62 2c 20 43 2d 6e 2c 20 | 43 2d 70 20 61 6e 64 20 |b, C-n, |C-p and |
|00004480| 54 41 42 3b 20 74 68 65 | 79 20 61 72 65 20 74 72 |TAB; the|y are tr|
|00004490| 65 61 74 65 64 20 61 73 | 0a 6e 6f 6e 2d 51 75 61 |eated as|.non-Qua|
|000044a0| 69 6c 20 63 6f 6d 6d 61 | 6e 64 73 2e 1f 0a 28 64 |il comma|nds...(d|
|000044b0| 65 66 61 6c 69 61 73 20 | 27 71 75 61 69 6c 2d 64 |efalias |'quail-d|
|000044c0| 65 66 69 6e 65 2d 70 61 | 63 6b 61 67 65 20 23 5b |efine-pa|ckage #[|
|000044d0| 28 6e 61 6d 65 20 6c 61 | 6e 67 75 61 67 65 20 74 |(name la|nguage t|
|000044e0| 69 74 6c 65 20 26 6f 70 | 74 69 6f 6e 61 6c 20 67 |itle &op|tional g|
|000044f0| 75 69 64 61 6e 63 65 20 | 64 6f 63 73 74 72 69 6e |uidance |docstrin|
|00004500| 67 20 74 72 61 6e 73 6c | 61 74 69 6f 6e 2d 6b 65 |g transl|ation-ke|
|00004510| 79 73 20 66 6f 72 67 65 | 74 2d 6c 61 73 74 2d 73 |ys forge|t-last-s|
|00004520| 65 6c 65 63 74 69 6f 6e | 20 64 65 74 65 72 6d 69 |election| determi|
|00004530| 6e 69 73 74 69 63 20 6b | 62 64 2d 74 72 61 6e 73 |nistic k|bd-trans|
|00004540| 6c 61 74 65 20 73 68 6f | 77 2d 6c 61 79 6f 75 74 |late sho|w-layout|
|00004550| 20 63 72 65 61 74 65 2d | 64 65 63 6f 64 65 2d 6d | create-|decode-m|
|00004560| 61 70 20 6d 61 78 69 6d | 75 6d 2d 73 68 6f 72 74 |ap maxim|um-short|
|00004570| 65 73 74 20 6f 76 65 72 | 6c 61 79 2d 70 6c 69 73 |est over|lay-plis|
|00004580| 74 20 75 70 64 61 74 65 | 2d 74 72 61 6e 73 6c 61 |t update|-transla|
|00004590| 74 69 6f 6e 2d 66 75 6e | 63 74 69 6f 6e 20 63 6f |tion-fun|ction co|
|000045a0| 6e 76 65 72 73 69 6f 6e | 2d 6b 65 79 73 20 73 69 |nversion|-keys si|
|000045b0| 6d 70 6c 65 29 20 22 c0 | 89 19 1a 0b ab 82 c4 15 |mple) ".|........|
|000045c0| 0e 06 ab a5 c7 0e 08 ab | 84 0e 09 aa 82 0e 5c 6e |........|......\n|
|000045d0| 21 12 0e 06 ab 9f cb 5c | 6e 0e 06 40 40 0e 06 40 |!......\|n..@@..@|
|000045e0| 41 23 88 0e 06 41 89 16 | 06 aa 6a 0e 08 ab 84 0e |A#...A..|..j.....|
|000045f0| 09 aa 82 0e 5c 6e 12 0e | 0c ab 9d c7 0e 0d 21 11 |....\n..|......!.|
|00004600| 0e 0c ab 94 cb 09 0e 0c | 40 40 0e 0c 40 41 23 88 |........|@@..@A#.|
|00004610| 0e 0c 41 89 16 0c ac 6c | ce 0e 0f 0e 10 c0 43 0e |..A....l|......C.|
|00004620| 11 0e 12 ae 81 d3 5c 6e | 0d 0b 0e 14 0e 15 0e 16 |......\n|........|
|00004630| ad 82 d7 43 0e 18 0e 19 | 0e 1a 09 0e 08 af 10 21 |...C....|.......!|
|00004640| 88 db 0e 0f 0e 1c 5c 22 | 0e 1d de 0e 10 0e 12 46 |......\"|.......F|
|00004650| 1e 1f 89 1e 20 ab 88 0e | 20 0e 1f a1 88 aa 8a 0e |.... ...| .......|
|00004660| 0f 0e 1f 42 0e 1c 42 16 | 1c 2c e1 0e 0f 21 87 22 |...B..B.|.,...!."|
|00004670| 20 5b 6e 69 6c 20 63 6f | 6e 76 65 72 73 69 6f 6e | [nil co|nversion|
|00004680| 2d 6b 65 79 6d 61 70 20 | 74 72 61 6e 73 6c 61 74 |-keymap |translat|
|00004690| 69 6f 6e 2d 6b 65 79 6d | 61 70 20 64 65 74 65 72 |ion-keym|ap deter|
|000046a0| 6d 69 6e 69 73 74 69 63 | 20 74 20 66 6f 72 67 65 |ministic| t forge|
|000046b0| 74 2d 6c 61 73 74 2d 73 | 65 6c 65 63 74 69 6f 6e |t-last-s|election|
|000046c0| 20 74 72 61 6e 73 6c 61 | 74 69 6f 6e 2d 6b 65 79 | transla|tion-key|
|000046d0| 73 20 63 6f 70 79 2d 6b | 65 79 6d 61 70 20 73 69 |s copy-k|eymap si|
|000046e0| 6d 70 6c 65 20 71 75 61 | 69 6c 2d 73 69 6d 70 6c |mple qua|il-simpl|
|000046f0| 65 2d 74 72 61 6e 73 6c | 61 74 69 6f 6e 2d 6b 65 |e-transl|ation-ke|
|00004700| 79 6d 61 70 20 71 75 61 | 69 6c 2d 74 72 61 6e 73 |ymap qua|il-trans|
|00004710| 6c 61 74 69 6f 6e 2d 6b | 65 79 6d 61 70 20 64 65 |lation-k|eymap de|
|00004720| 66 69 6e 65 2d 6b 65 79 | 20 63 6f 6e 76 65 72 73 |fine-key| convers|
|00004730| 69 6f 6e 2d 6b 65 79 73 | 20 71 75 61 69 6c 2d 63 |ion-keys| quail-c|
|00004740| 6f 6e 76 65 72 73 69 6f | 6e 2d 6b 65 79 6d 61 70 |onversio|n-keymap|
|00004750| 20 71 75 61 69 6c 2d 61 | 64 64 2d 70 61 63 6b 61 | quail-a|dd-packa|
|00004760| 67 65 20 6e 61 6d 65 20 | 74 69 74 6c 65 20 67 75 |ge name |title gu|
|00004770| 69 64 61 6e 63 65 20 64 | 6f 63 73 74 72 69 6e 67 |idance d|ocstring|
|00004780| 20 22 22 20 6b 62 64 2d | 74 72 61 6e 73 6c 61 74 | "" kbd-|translat|
|00004790| 65 20 73 68 6f 77 2d 6c | 61 79 6f 75 74 20 63 72 |e show-l|ayout cr|
|000047a0| 65 61 74 65 2d 64 65 63 | 6f 64 65 2d 6d 61 70 20 |eate-dec|ode-map |
|000047b0| 64 65 63 6f 64 65 2d 6d | 61 70 20 6d 61 78 69 6d |decode-m|ap maxim|
|000047c0| 75 6d 2d 73 68 6f 72 74 | 65 73 74 20 6f 76 65 72 |um-short|est over|
|000047d0| 6c 61 79 2d 70 6c 69 73 | 74 20 75 70 64 61 74 65 |lay-plis|t update|
|000047e0| 2d 74 72 61 6e 73 6c 61 | 74 69 6f 6e 2d 66 75 6e |-transla|tion-fun|
|000047f0| 63 74 69 6f 6e 20 61 73 | 73 6f 63 20 69 6e 70 75 |ction as|soc inpu|
|00004800| 74 2d 6d 65 74 68 6f 64 | 2d 61 6c 69 73 74 20 6c |t-method|-alist l|
|00004810| 61 6e 67 75 61 67 65 20 | 71 75 61 69 6c 2d 75 73 |anguage |quail-us|
|00004820| 65 2d 70 61 63 6b 61 67 | 65 20 76 61 6c 20 73 6c |e-packag|e val sl|
|00004830| 6f 74 20 71 75 61 69 6c | 2d 73 65 6c 65 63 74 2d |ot quail|-select-|
|00004840| 70 61 63 6b 61 67 65 5d | 20 31 38 20 28 23 24 20 |package]| 18 (#$ |
|00004850| 2e 20 31 34 30 36 37 29 | 5d 29 0a 28 64 65 66 61 |. 14067)|]).(defa|
|00004860| 6c 69 61 73 20 27 71 75 | 61 69 6c 2d 73 65 74 75 |lias 'qu|ail-setu|
|00004870| 70 2d 6f 76 65 72 6c 61 | 79 73 20 23 5b 28 63 6f |p-overla|ys #[(co|
|00004880| 6e 76 65 72 73 69 6f 6e | 2d 6d 6f 64 65 29 20 22 |nversion|-mode) "|
|00004890| 60 18 c1 5c 6e 21 ab 88 | c3 5c 6e 08 89 23 88 aa |`..\n!..|.\n..#..|
|000048a0| b0 c4 08 89 c5 89 c6 25 | 12 0e 07 ab 86 c8 5c 6e |.......%|......\n|
|000048b0| c9 ca 23 88 cb 0e 0c 38 | 89 1e 0d ab 94 c8 5c 6e |..#....8|......\n|
|000048c0| 0e 0d 40 0e 0d 41 40 23 | 88 0e 0d 41 41 89 16 0d |..@..A@#|...AA...|
|000048d0| ac 6c 29 0e 0e ad a8 c1 | 0e 0f 21 ab 8f d0 0e 0f |.l).....|..!.....|
|000048e0| 21 3f ad 9b c3 0e 0f 08 | 89 23 aa 93 c4 08 89 c5 |!?......|.#......|
|000048f0| 89 c6 25 16 0f 0e 07 ad | 86 c8 0e 0f c9 ca 23 29 |..%.....|......#)|
|00004900| 87 22 20 5b 70 6f 73 20 | 6f 76 65 72 6c 61 79 70 |." [pos |overlayp|
|00004910| 20 71 75 61 69 6c 2d 6f | 76 65 72 6c 61 79 20 6d | quail-o|verlay m|
|00004920| 6f 76 65 2d 6f 76 65 72 | 6c 61 79 20 6d 61 6b 65 |ove-over|lay make|
|00004930| 2d 6f 76 65 72 6c 61 79 | 20 6e 69 6c 20 74 20 69 |-overlay| nil t i|
|00004940| 6e 70 75 74 2d 6d 65 74 | 68 6f 64 2d 68 69 67 68 |nput-met|hod-high|
|00004950| 6c 69 67 68 74 2d 66 6c | 61 67 20 6f 76 65 72 6c |light-fl|ag overl|
|00004960| 61 79 2d 70 75 74 20 66 | 61 63 65 20 75 6e 64 65 |ay-put f|ace unde|
|00004970| 72 6c 69 6e 65 20 31 32 | 20 71 75 61 69 6c 2d 63 |rline 12| quail-c|
|00004980| 75 72 72 65 6e 74 2d 70 | 61 63 6b 61 67 65 20 6c |urrent-p|ackage l|
|00004990| 20 63 6f 6e 76 65 72 73 | 69 6f 6e 2d 6d 6f 64 65 | convers|ion-mode|
|000049a0| 20 71 75 61 69 6c 2d 63 | 6f 6e 76 2d 6f 76 65 72 | quail-c|onv-over|
|000049b0| 6c 61 79 20 6f 76 65 72 | 6c 61 79 2d 73 74 61 72 |lay over|lay-star|
|000049c0| 74 5d 20 37 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |t] 7]).(|defalias|
|000049d0| 20 27 71 75 61 69 6c 2d | 64 65 6c 65 74 65 2d 6f | 'quail-|delete-o|
|000049e0| 76 65 72 6c 61 79 73 20 | 23 5b 6e 69 6c 20 22 c0 |verlays |#[nil ".|
|000049f0| 09 21 ab 84 c2 09 21 88 | c0 0b 21 ad 83 c2 0b 21 |.!....!.|..!....!|
|00004a00| 87 22 20 5b 6f 76 65 72 | 6c 61 79 70 20 71 75 61 |." [over|layp qua|
|00004a10| 69 6c 2d 6f 76 65 72 6c | 61 79 20 64 65 6c 65 74 |il-overl|ay delet|
|00004a20| 65 2d 6f 76 65 72 6c 61 | 79 20 71 75 61 69 6c 2d |e-overla|y quail-|
|00004a30| 63 6f 6e 76 2d 6f 76 65 | 72 6c 61 79 5d 20 32 5d |conv-ove|rlay] 2]|
|00004a40| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 71 75 61 |).(defal|ias 'qua|
|00004a50| 69 6c 2d 6b 69 6c 6c 2d | 67 75 69 64 61 6e 63 65 |il-kill-|guidance|
|00004a60| 2d 62 75 66 20 23 5b 6e | 69 6c 20 22 c0 09 21 ad |-buf #[n|il "..!.|
|00004a70| 83 c2 09 21 87 22 20 5b | 62 75 66 66 65 72 2d 6c |...!." [|buffer-l|
|00004a80| 69 76 65 2d 70 20 71 75 | 61 69 6c 2d 67 75 69 64 |ive-p qu|ail-guid|
|00004a90| 61 6e 63 65 2d 62 75 66 | 20 6b 69 6c 6c 2d 62 75 |ance-buf| kill-bu|
|00004aa0| 66 66 65 72 5d 20 32 5d | 29 0a 23 40 34 32 31 20 |ffer] 2]|).#@421 |
|00004ab0| 54 6f 67 67 6c 65 20 51 | 75 61 69 6c 20 6d 69 6e |Toggle Q|uail min|
|00004ac0| 6f 72 20 6d 6f 64 65 2e | 0a 57 69 74 68 20 61 72 |or mode.|.With ar|
|00004ad0| 67 2c 20 74 75 72 6e 20 | 51 75 61 69 6c 20 6d 6f |g, turn |Quail mo|
|00004ae0| 64 65 20 6f 6e 20 69 66 | 20 61 6e 64 20 6f 6e 6c |de on if| and onl|
|00004af0| 79 20 69 66 20 61 72 67 | 20 69 73 20 70 6f 73 69 |y if arg| is posi|
|00004b00| 74 69 76 65 2e 0a 0a 59 | 6f 75 20 73 68 6f 75 6c |tive...Y|ou shoul|
|00004b10| 64 20 6e 6f 74 20 74 75 | 72 6e 20 6f 6e 20 61 6e |d not tu|rn on an|
|00004b20| 64 20 6f 66 66 20 51 75 | 61 69 6c 20 6d 6f 64 65 |d off Qu|ail mode|
|00004b30| 20 6d 61 6e 75 61 6c 6c | 79 2c 20 69 6e 73 74 65 | manuall|y, inste|
|00004b40| 61 64 20 75 73 65 0a 74 | 68 65 20 63 6f 6d 6d 61 |ad use.t|he comma|
|00004b50| 6e 64 73 20 60 74 6f 67 | 67 6c 65 2d 69 6e 70 75 |nds `tog|gle-inpu|
|00004b60| 74 2d 6d 65 74 68 6f 64 | 27 20 6f 72 20 60 73 65 |t-method|' or `se|
|00004b70| 6c 65 63 74 2d 69 6e 70 | 75 74 2d 6d 65 74 68 6f |lect-inp|ut-metho|
|00004b80| 64 73 27 20 28 77 68 69 | 63 68 0a 73 65 65 29 2e |ds' (whi|ch.see).|
|00004b90| 20 20 54 68 65 79 20 61 | 75 74 6f 6d 61 74 69 63 |  They a|utomatic|
|00004ba0| 61 6c 6c 79 20 74 75 72 | 6e 20 6f 6e 20 6f 72 20 |ally tur|n on or |
|00004bb0| 6f 66 66 20 74 68 69 73 | 20 6d 6f 64 65 2e 0a 0a |off this| mode...|
|00004bc0| 54 72 79 20 5c 5b 64 65 | 73 63 72 69 62 65 2d 62 |Try \[de|scribe-b|
|00004bd0| 69 6e 64 69 6e 67 73 5d | 20 69 6e 20 51 75 61 69 |indings]| in Quai|
|00004be0| 6c 20 6d 6f 64 65 20 74 | 6f 20 73 65 65 20 74 68 |l mode t|o see th|
|00004bf0| 65 20 61 76 61 69 6c 61 | 62 6c 65 20 6b 65 79 20 |e availa|ble key |
|00004c00| 62 69 6e 64 69 6e 67 73 | 2e 0a 54 68 65 20 63 6f |bindings|..The co|
|00004c10| 6d 6d 61 6e 64 20 5c 5b | 64 65 73 63 72 69 62 65 |mmand \[|describe|
|00004c20| 2d 69 6e 70 75 74 2d 6d | 65 74 68 6f 64 5d 20 64 |-input-m|ethod] d|
|00004c30| 65 73 63 72 69 62 65 73 | 20 74 68 65 20 63 75 72 |escribes| the cur|
|00004c40| 72 65 6e 74 20 51 75 61 | 69 6c 20 70 61 63 6b 61 |rent Qua|il packa|
|00004c50| 67 65 2e 1f 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |ge...(de|falias '|
|00004c60| 71 75 61 69 6c 2d 6d 6f | 64 65 20 23 5b 28 26 6f |quail-mo|de #[(&o|
|00004c70| 70 74 69 6f 6e 61 6c 20 | 61 72 67 29 20 22 08 ac |ptional |arg) "..|
|00004c80| 84 09 3f aa 85 c2 08 21 | c3 56 89 11 ac 8f c4 20 |..?....!|.V..... |
|00004c90| 88 c5 20 88 c6 16 07 c8 | c9 21 88 aa ca 0e 5c 6e |.. .....|.!....\n|
|00004ca0| ac 9b c6 1e 0b 0e 0c ab | 88 0e 0c 40 40 16 0b aa |........|...@@...|
|00004cb0| 86 c6 11 cd ce 21 88 cf | 0e 0b 21 88 29 d0 16 11 |.....!..|..!.)...|
|00004cc0| d2 16 07 c5 20 88 d3 20 | 88 d4 20 d5 20 61 ab 85 |.... .. |.. . a..|
|00004cd0| d6 d7 d8 5c 22 88 d9 da | 21 88 d9 db 21 88 d6 db |...\"...|!...!...|
|00004ce0| dc c6 dd 24 88 c8 de 21 | 88 df 20 87 22 20 5b 61 |...$...!|.. ." [a|
|00004cf0| 72 67 20 71 75 61 69 6c | 2d 6d 6f 64 65 20 70 72 |rg quail|-mode pr|
|00004d00| 65 66 69 78 2d 6e 75 6d | 65 72 69 63 2d 76 61 6c |efix-num|eric-val|
|00004d10| 75 65 20 30 20 71 75 61 | 69 6c 2d 68 69 64 65 2d |ue 0 qua|il-hide-|
|00004d20| 67 75 69 64 61 6e 63 65 | 2d 62 75 66 20 71 75 61 |guidance|-buf qua|
|00004d30| 69 6c 2d 64 65 6c 65 74 | 65 2d 6f 76 65 72 6c 61 |il-delet|e-overla|
|00004d40| 79 73 20 6e 69 6c 20 64 | 65 73 63 72 69 62 65 2d |ys nil d|escribe-|
|00004d50| 63 75 72 72 65 6e 74 2d | 69 6e 70 75 74 2d 6d 65 |current-|input-me|
|00004d60| 74 68 6f 64 2d 66 75 6e | 63 74 69 6f 6e 20 72 75 |thod-fun|ction ru|
|00004d70| 6e 2d 68 6f 6f 6b 73 20 | 71 75 61 69 6c 2d 6d 6f |n-hooks |quail-mo|
|00004d80| 64 65 2d 65 78 69 74 2d | 68 6f 6f 6b 20 71 75 61 |de-exit-|hook qua|
|00004d90| 69 6c 2d 63 75 72 72 65 | 6e 74 2d 70 61 63 6b 61 |il-curre|nt-packa|
|00004da0| 67 65 20 6e 61 6d 65 20 | 71 75 61 69 6c 2d 70 61 |ge name |quail-pa|
|00004db0| 63 6b 61 67 65 2d 61 6c | 69 73 74 20 65 72 72 6f |ckage-al|ist erro|
|00004dc0| 72 20 22 4e 6f 20 51 75 | 61 69 6c 20 70 61 63 6b |r "No Qu|ail pack|
|00004dd0| 61 67 65 20 6c 6f 61 64 | 65 64 22 20 71 75 61 69 |age load|ed" quai|
|00004de0| 6c 2d 73 65 6c 65 63 74 | 2d 70 61 63 6b 61 67 65 |l-select|-package|
|00004df0| 20 71 75 61 69 6c 2d 69 | 6e 61 63 74 69 76 61 74 | quail-i|nactivat|
|00004e00| 65 20 69 6e 61 63 74 69 | 76 61 74 65 2d 63 75 72 |e inacti|vate-cur|
|00004e10| 72 65 6e 74 2d 69 6e 70 | 75 74 2d 6d 65 74 68 6f |rent-inp|ut-metho|
|00004e20| 64 2d 66 75 6e 63 74 69 | 6f 6e 20 71 75 61 69 6c |d-functi|on quail|
|00004e30| 2d 68 65 6c 70 20 71 75 | 61 69 6c 2d 73 68 6f 77 |-help qu|ail-show|
|00004e40| 2d 67 75 69 64 61 6e 63 | 65 2d 62 75 66 20 73 65 |-guidanc|e-buf se|
|00004e50| 6c 65 63 74 65 64 2d 77 | 69 6e 64 6f 77 20 6d 69 |lected-w|indow mi|
|00004e60| 6e 69 62 75 66 66 65 72 | 2d 77 69 6e 64 6f 77 20 |nibuffer|-window |
|00004e70| 61 64 64 2d 68 6f 6f 6b | 20 6d 69 6e 69 62 75 66 |add-hook| minibuf|
|00004e80| 66 65 72 2d 65 78 69 74 | 2d 68 6f 6f 6b 20 71 75 |fer-exit|-hook qu|
|00004e90| 61 69 6c 2d 65 78 69 74 | 2d 66 72 6f 6d 2d 6d 69 |ail-exit|-from-mi|
|00004ea0| 6e 69 62 75 66 66 65 72 | 20 6d 61 6b 65 2d 6c 6f |nibuffer| make-lo|
|00004eb0| 63 61 6c 2d 68 6f 6f 6b | 20 70 6f 73 74 2d 63 6f |cal-hook| post-co|
|00004ec0| 6d 6d 61 6e 64 2d 68 6f | 6f 6b 20 6b 69 6c 6c 2d |mmand-ho|ok kill-|
|00004ed0| 62 75 66 66 65 72 2d 68 | 6f 6f 6b 20 71 75 61 69 |buffer-h|ook quai|
|00004ee0| 6c 2d 6b 69 6c 6c 2d 67 | 75 69 64 61 6e 63 65 2d |l-kill-g|uidance-|
|00004ef0| 62 75 66 20 74 20 71 75 | 61 69 6c 2d 6d 6f 64 65 |buf t qu|ail-mode|
|00004f00| 2d 68 6f 6f 6b 20 66 6f | 72 63 65 2d 6d 6f 64 65 |-hook fo|rce-mode|
|00004f10| 2d 6c 69 6e 65 2d 75 70 | 64 61 74 65 5d 20 36 20 |-line-up|date] 6 |
|00004f20| 28 23 24 20 2e 20 31 39 | 31 32 30 29 5d 29 0a 28 |(#$ . 19|120)]).(|
|00004f30| 64 65 66 61 6c 69 61 73 | 20 27 71 75 61 69 6c 2d |defalias| 'quail-|
|00004f40| 65 78 69 74 2d 66 72 6f | 6d 2d 6d 69 6e 69 62 75 |exit-fro|m-minibu|
|00004f50| 66 66 65 72 20 23 5b 6e | 69 6c 20 22 c0 20 88 c1 |ffer #[n|il ". ..|
|00004f60| 20 c2 58 ad 84 c3 c4 c5 | 5c 22 87 22 20 5b 69 6e | .X.....|\"." [in|
|00004f70| 61 63 74 69 76 61 74 65 | 2d 69 6e 70 75 74 2d 6d |activate|-input-m|
|00004f80| 65 74 68 6f 64 20 6d 69 | 6e 69 62 75 66 66 65 72 |ethod mi|nibuffer|
|00004f90| 2d 64 65 70 74 68 20 31 | 20 72 65 6d 6f 76 65 2d |-depth 1| remove-|
|00004fa0| 68 6f 6f 6b 20 6d 69 6e | 69 62 75 66 66 65 72 2d |hook min|ibuffer-|
|00004fb0| 65 78 69 74 2d 68 6f 6f | 6b 20 71 75 61 69 6c 2d |exit-hoo|k quail-|
|00004fc0| 65 78 69 74 2d 66 72 6f | 6d 2d 6d 69 6e 69 62 75 |exit-fro|m-minibu|
|00004fd0| 66 66 65 72 5d 20 33 5d | 29 0a 28 62 79 74 65 2d |ffer] 3]|).(byte-|
|00004fe0| 63 6f 64 65 20 22 c0 c1 | 21 ac 82 c2 11 c1 0b 42 |code "..|!......B|
|00004ff0| 13 c0 c4 21 ac 82 c2 14 | c4 0b 42 13 c2 87 22 20 |...!....|..B..." |
|00005000| 5b 62 6f 75 6e 64 70 20 | 71 75 61 69 6c 2d 73 61 |[boundp |quail-sa|
|00005010| 76 65 64 2d 63 75 72 72 | 65 6e 74 2d 6d 61 70 20 |ved-curr|ent-map |
|00005020| 6e 69 6c 20 63 75 72 72 | 65 6e 74 2d 6c 6f 61 64 |nil curr|ent-load|
|00005030| 2d 6c 69 73 74 20 71 75 | 61 69 6c 2d 73 61 76 65 |-list qu|ail-save|
|00005040| 64 2d 63 75 72 72 65 6e | 74 2d 62 75 66 66 65 72 |d-curren|t-buffer|
|00005050| 5d 20 32 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 |] 2).(de|falias '|
|00005060| 71 75 61 69 6c 2d 74 6f | 67 67 6c 65 2d 6d 6f 64 |quail-to|ggle-mod|
|00005070| 65 2d 74 65 6d 70 6f 72 | 61 72 69 6c 79 20 23 5b |e-tempor|arily #[|
|00005080| 6e 69 6c 20 22 08 ab 8a | 70 11 5c 6e 13 c4 10 c4 |nil "...|p.\n....|
|00005090| 89 12 87 c5 c6 c7 c8 23 | 88 70 09 61 ab 8f 0e 09 |.......#|.p.a....|
|000050a0| ad 94 c8 10 0b 12 0e 5c | 6e ad 8c cb 20 87 8a 09 |.......\|n... ...|
|000050b0| 71 88 c8 10 cc 20 29 87 | 22 20 5b 71 75 61 69 6c |q.... ).|" [quail|
|000050c0| 2d 6d 6f 64 65 20 71 75 | 61 69 6c 2d 73 61 76 65 |-mode qu|ail-save|
|000050d0| 64 2d 63 75 72 72 65 6e | 74 2d 62 75 66 66 65 72 |d-curren|t-buffer|
|000050e0| 20 6f 76 65 72 72 69 64 | 69 6e 67 2d 74 65 72 6d | overrid|ing-term|
|000050f0| 69 6e 61 6c 2d 6c 6f 63 | 61 6c 2d 6d 61 70 20 71 |inal-loc|al-map q|
|00005100| 75 61 69 6c 2d 73 61 76 | 65 64 2d 63 75 72 72 65 |uail-sav|ed-curre|
|00005110| 6e 74 2d 6d 61 70 20 6e | 69 6c 20 72 65 6d 6f 76 |nt-map n|il remov|
|00005120| 65 2d 68 6f 6f 6b 20 70 | 6f 73 74 2d 63 6f 6d 6d |e-hook p|ost-comm|
|00005130| 61 6e 64 2d 68 6f 6f 6b | 20 71 75 61 69 6c 2d 74 |and-hook| quail-t|
|00005140| 6f 67 67 6c 65 2d 6d 6f | 64 65 2d 74 65 6d 70 6f |oggle-mo|de-tempo|
|00005150| 72 61 72 69 6c 79 20 74 | 20 63 75 72 72 65 6e 74 |rarily t| current|
|00005160| 2d 69 6e 70 75 74 2d 6d | 65 74 68 6f 64 20 69 6e |-input-m|ethod in|
|00005170| 70 75 74 2d 6d 65 74 68 | 6f 64 2d 65 78 69 74 2d |put-meth|od-exit-|
|00005180| 6f 6e 2d 69 6e 76 61 6c | 69 64 2d 6b 65 79 20 69 |on-inval|id-key i|
|00005190| 6e 61 63 74 69 76 61 74 | 65 2d 69 6e 70 75 74 2d |nactivat|e-input-|
|000051a0| 6d 65 74 68 6f 64 20 71 | 75 61 69 6c 2d 64 65 6c |method q|uail-del|
|000051b0| 65 74 65 2d 6f 76 65 72 | 6c 61 79 73 5d 20 34 5d |ete-over|lays] 4]|
|000051c0| 29 0a 23 40 31 30 35 20 | 45 78 65 63 75 74 65 20 |).#@105 |Execute |
|000051d0| 6f 6e 65 20 6e 6f 6e 2d | 51 75 61 69 6c 20 63 6f |one non-|Quail co|
|000051e0| 6d 6d 61 6e 64 20 6f 75 | 74 20 6f 66 20 51 75 61 |mmand ou|t of Qua|
|000051f0| 69 6c 20 6d 6f 64 65 2e | 0a 54 68 65 20 63 75 72 |il mode.|.The cur|
|00005200| 72 65 6e 74 20 74 72 61 | 6e 73 6c 61 74 69 6f 6e |rent tra|nslation|
|00005210| 20 61 6e 64 20 63 6f 6e | 76 65 72 73 69 6f 6e 20 | and con|version |
|00005220| 61 72 65 20 74 65 72 6d | 69 6e 61 74 65 64 2e 1f |are term|inated..|
|00005230| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 71 75 61 69 |.(defali|as 'quai|
|00005240| 6c 2d 65 78 65 63 75 74 | 65 2d 6e 6f 6e 2d 71 75 |l-execut|e-non-qu|
|00005250| 61 69 6c 2d 63 6f 6d 6d | 61 6e 64 20 23 5b 6e 69 |ail-comm|and #[ni|
|00005260| 6c 20 22 c0 20 19 c2 09 | 21 1b c4 0b 0d 5c 22 15 |l ". ...|!....\".|
|00005270| 2a c6 20 88 c7 20 88 c8 | 20 88 c9 16 5c 6e cb 0e |*. .. ..| ...\n..|
|00005280| 0c 21 ab 89 8a 0e 0c 71 | 88 cd 20 88 29 ce cf d0 |.!.....q|.. .)...|
|00005290| c9 d1 24 87 22 20 5b 74 | 68 69 73 2d 63 6f 6d 6d |..$." [t|his-comm|
|000052a0| 61 6e 64 2d 6b 65 79 73 | 20 6b 65 79 20 6c 69 73 |and-keys| key lis|
|000052b0| 74 69 66 79 2d 6b 65 79 | 2d 73 65 71 75 65 6e 63 |tify-key|-sequenc|
|000052c0| 65 20 6b 65 79 6c 69 73 | 74 20 61 70 70 65 6e 64 |e keylis|t append|
|000052d0| 20 75 6e 72 65 61 64 2d | 63 6f 6d 6d 61 6e 64 2d | unread-|command-|
|000052e0| 65 76 65 6e 74 73 20 72 | 65 73 65 74 2d 74 68 69 |events r|eset-thi|
|000052f0| 73 2d 63 6f 6d 6d 61 6e | 64 2d 6c 65 6e 67 74 68 |s-comman|d-length|
|00005300| 73 20 71 75 61 69 6c 2d | 74 65 72 6d 69 6e 61 74 |s quail-|terminat|
|00005310| 65 2d 74 72 61 6e 73 6c | 61 74 69 6f 6e 20 71 75 |e-transl|ation qu|
|00005320| 61 69 6c 2d 64 65 6c 65 | 74 65 2d 6f 76 65 72 6c |ail-dele|te-overl|
|00005330| 61 79 73 20 6e 69 6c 20 | 6f 76 65 72 72 69 64 69 |ays nil |overridi|
|00005340| 6e 67 2d 74 65 72 6d 69 | 6e 61 6c 2d 6c 6f 63 61 |ng-termi|nal-loca|
|00005350| 6c 2d 6d 61 70 20 62 75 | 66 66 65 72 2d 6c 69 76 |l-map bu|ffer-liv|
|00005360| 65 2d 70 20 71 75 61 69 | 6c 2d 67 75 69 64 61 6e |e-p quai|l-guidan|
|00005370| 63 65 2d 62 75 66 20 65 | 72 61 73 65 2d 62 75 66 |ce-buf e|rase-buf|
|00005380| 66 65 72 20 61 64 64 2d | 68 6f 6f 6b 20 70 6f 73 |fer add-|hook pos|
|00005390| 74 2d 63 6f 6d 6d 61 6e | 64 2d 68 6f 6f 6b 20 71 |t-comman|d-hook q|
|000053a0| 75 61 69 6c 2d 74 6f 67 | 67 6c 65 2d 6d 6f 64 65 |uail-tog|gle-mode|
|000053b0| 2d 74 65 6d 70 6f 72 61 | 72 69 6c 79 20 74 5d 20 |-tempora|rily t] |
|000053c0| 35 20 28 23 24 20 2e 20 | 32 30 39 33 36 29 20 6e |5 (#$ . |20936) n|
|000053d0| 69 6c 5d 29 0a 23 40 32 | 38 34 20 53 74 61 6e 64 |il]).#@2|84 Stand|
|000053e0| 61 72 64 20 6b 65 79 62 | 6f 61 72 64 20 6c 61 79 |ard keyb|oard lay|
|000053f0| 6f 75 74 20 6f 66 20 70 | 72 69 6e 74 61 62 6c 65 |out of p|rintable|
|00005400| 20 63 68 61 72 61 63 74 | 65 72 73 20 51 75 61 69 | charact|ers Quai|
|00005410| 6c 20 61 73 73 75 6d 65 | 73 2e 0a 53 65 65 20 74 |l assume|s..See t|
|00005420| 68 65 20 64 6f 63 75 6d | 65 6e 74 61 74 69 6f 6e |he docum|entation|
|00005430| 20 6f 66 20 60 71 75 61 | 69 6c 2d 6b 65 79 62 6f | of `qua|il-keybo|
|00005440| 61 72 64 2d 6c 61 79 6f | 75 74 27 20 66 6f 72 20 |ard-layo|ut' for |
|00005450| 74 68 69 73 20 66 6f 72 | 6d 61 74 2e 0a 54 68 69 |this for|mat..Thi|
|00005460| 73 20 6c 61 79 6f 75 74 | 20 69 73 20 61 6c 6d 6f |s layout| is almo|
|00005470| 73 74 20 74 68 65 20 73 | 61 6d 65 20 61 73 20 74 |st the s|ame as t|
|00005480| 68 61 74 20 6f 66 20 56 | 54 31 30 30 2c 0a 20 62 |hat of V|T100,. b|
|00005490| 75 74 20 74 68 65 20 6c | 6f 63 61 74 69 6f 6e 20 |ut the l|ocation |
|000054a0| 6f 66 20 6b 65 79 20 5c | 20 28 62 61 63 6b 73 6c |of key \| (backsl|
|000054b0| 61 73 68 29 20 69 73 20 | 6a 75 73 74 20 72 69 67 |ash) is |just rig|
|000054c0| 68 74 20 6f 66 20 6b 65 | 79 20 27 20 28 73 69 6e |ht of ke|y ' (sin|
|000054d0| 67 6c 65 2d 71 75 6f 74 | 65 29 2c 0a 20 6e 6f 74 |gle-quot|e),. not|
|000054e0| 20 72 69 67 68 74 20 6f | 66 20 52 45 54 55 52 4e | right o|f RETURN|
|000054f0| 20 6b 65 79 2e 1f 0a 28 | 64 65 66 63 6f 6e 73 74 | key...(|defconst|
|00005500| 20 71 75 61 69 6c 2d 6b | 65 79 62 6f 61 72 64 2d | quail-k|eyboard-|
|00005510| 6c 61 79 6f 75 74 2d 73 | 74 61 6e 64 61 72 64 20 |layout-s|tandard |
|00005520| 22 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |"       |        |
|00005530| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005540| 20 31 21 32 40 33 23 34 | 24 35 25 36 5e 37 26 38 | 1!2@3#4|$5%6^7&8|
|00005550| 2a 39 28 30 29 2d 5f 3d | 2b 60 7e 20 20 20 20 71 |*9(0)-_=|+`~    q|
|00005560| 51 77 57 65 45 72 52 74 | 54 79 59 75 55 69 49 6f |QwWeErRt|TyYuUiIo|
|00005570| 4f 70 50 5b 7b 5d 7d 20 | 20 20 20 20 20 61 41 73 |OpP[{]} |     aAs|
|00005580| 53 64 44 66 46 67 47 68 | 48 6a 4a 6b 4b 6c 4c 3b |SdDfFgGh|HjJkKlL;|
|00005590| 3a 27 5c 22 5c 5c 7c 20 | 20 20 20 20 20 7a 5a 78 |:'\"\\| |     zZx|
|000055a0| 58 63 43 76 56 62 42 6e | 4e 6d 4d 2c 3c 2e 3e 2f |XcCvVbBn|NmM,<.>/|
|000055b0| 3f 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |?       |        |
|000055c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000055d0| 20 20 20 20 20 20 20 22 | 20 28 23 24 20 2e 20 32 |       "| (#$ . 2|
|000055e0| 31 34 36 37 29 29 0a 23 | 40 37 31 37 20 41 20 73 |1467)).#|@717 A s|
|000055f0| 74 72 69 6e 67 20 77 68 | 69 63 68 20 72 65 70 72 |tring wh|ich repr|
|00005600| 65 73 65 6e 74 73 20 70 | 68 79 73 69 63 61 6c 20 |esents p|hysical |
|00005610| 6b 65 79 20 6c 61 79 6f | 75 74 20 6f 66 20 61 20 |key layo|ut of a |
|00005620| 70 61 72 74 69 63 75 6c | 61 72 20 6b 65 79 62 6f |particul|ar keybo|
|00005630| 61 72 64 2e 0a 57 65 20 | 61 73 73 75 6d 65 20 74 |ard..We |assume t|
|00005640| 68 65 72 65 20 61 72 65 | 20 73 69 78 20 72 6f 77 |here are| six row|
|00005650| 73 20 61 6e 64 20 65 61 | 63 68 20 72 6f 77 20 68 |s and ea|ch row h|
|00005660| 61 73 20 31 35 20 6b 65 | 79 73 20 28 63 6f 6c 75 |as 15 ke|ys (colu|
|00005670| 6d 6e 73 29 2c 0a 09 74 | 68 65 20 66 69 72 73 74 |mns),..t|he first|
|00005680| 20 72 6f 77 20 69 73 20 | 61 62 6f 76 65 20 74 68 | row is |above th|
|00005690| 65 20 60 31 27 20 2d 20 | 60 30 27 20 72 6f 77 2c |e `1' - |`0' row,|
|000056a0| 0a 09 74 68 65 20 66 69 | 72 73 74 20 63 6f 6c 75 |..the fi|rst colu|
|000056b0| 6d 6e 20 6f 66 20 74 68 | 65 20 73 65 63 6f 6e 64 |mn of th|e second|
|000056c0| 20 72 6f 77 20 69 73 20 | 6c 65 66 74 20 6f 66 20 | row is |left of |
|000056d0| 6b 65 79 20 60 31 27 2c | 0a 09 74 68 65 20 66 69 |key `1',|..the fi|
|000056e0| 72 73 74 20 63 6f 6c 75 | 6d 6e 20 6f 66 20 74 68 |rst colu|mn of th|
|000056f0| 65 20 74 68 69 72 64 20 | 72 6f 77 20 69 73 20 6c |e third |row is l|
|00005700| 65 66 74 20 6f 66 20 6b | 65 79 20 60 71 27 2c 0a |eft of k|ey `q',.|
|00005710| 09 74 68 65 20 66 69 72 | 73 74 20 63 6f 6c 75 6d |.the fir|st colum|
|00005720| 6e 20 6f 66 20 74 68 65 | 20 66 6f 75 72 74 68 20 |n of the| fourth |
|00005730| 72 6f 77 20 69 73 20 6c | 65 66 74 20 6f 66 20 6b |row is l|eft of k|
|00005740| 65 79 20 60 61 27 2c 0a | 09 74 68 65 20 66 69 72 |ey `a',.|.the fir|
|00005750| 73 74 20 63 6f 6c 75 6d | 6e 20 6f 66 20 74 68 65 |st colum|n of the|
|00005760| 20 66 69 66 74 68 20 72 | 6f 77 20 69 73 20 6c 65 | fifth r|ow is le|
|00005770| 66 74 20 6f 66 20 6b 65 | 79 20 60 7a 27 2c 0a 09 |ft of ke|y `z',..|
|00005780| 74 68 65 20 73 69 78 74 | 68 20 72 6f 77 20 69 73 |the sixt|h row is|
|00005790| 20 62 65 6c 6f 77 20 74 | 68 65 20 60 7a 27 20 2d | below t|he `z' -|
|000057a0| 20 60 2f 27 20 72 6f 77 | 2e 0a 4e 74 68 20 28 4e | `/' row|..Nth (N|
|000057b0| 20 69 73 20 65 76 65 6e | 29 20 61 6e 64 20 28 4e | is even|) and (N|
|000057c0| 2b 31 29 74 68 20 63 68 | 61 72 61 63 74 65 72 73 |+1)th ch|aracters|
|000057d0| 20 69 6e 20 74 68 65 20 | 73 74 72 69 6e 67 20 61 | in the |string a|
|000057e0| 72 65 20 6e 6f 6e 2d 73 | 68 69 66 74 65 64 0a 20 |re non-s|hifted. |
|000057f0| 61 6e 64 20 73 68 69 66 | 74 65 64 20 63 68 61 72 |and shif|ted char|
|00005800| 61 63 74 65 72 73 20 72 | 65 73 70 65 63 74 69 76 |acters r|espectiv|
|00005810| 65 6c 79 20 61 74 20 74 | 68 65 20 73 61 6d 65 20 |ely at t|he same |
|00005820| 6c 6f 63 61 74 69 6f 6e | 2e 0a 54 68 65 20 6c 6f |location|..The lo|
|00005830| 63 61 74 69 6f 6e 20 6f | 66 20 4e 74 68 20 63 68 |cation o|f Nth ch|
|00005840| 61 72 61 63 74 65 72 20 | 69 73 20 72 6f 77 20 28 |aracter |is row (|
|00005850| 4e 20 2f 20 33 30 29 20 | 61 6e 64 20 63 6f 6c 75 |N / 30) |and colu|
|00005860| 6d 6e 20 28 28 4e 20 6d | 6f 64 20 33 30 29 20 2f |mn ((N m|od 30) /|
|00005870| 20 32 29 2e 0a 54 68 65 | 20 63 6f 6d 6d 61 6e 64 | 2)..The| command|
|00005880| 20 60 71 75 61 69 6c 2d | 73 65 74 2d 6b 65 79 62 | `quail-|set-keyb|
|00005890| 6f 61 72 64 2d 6c 61 79 | 6f 75 74 27 20 75 73 75 |oard-lay|out' usu|
|000058a0| 61 6c 6c 79 20 73 65 74 | 73 20 74 68 69 73 20 76 |ally set|s this v|
|000058b0| 61 72 69 61 62 6c 65 2e | 1f 0a 28 64 65 66 76 61 |ariable.|..(defva|
|000058c0| 72 20 71 75 61 69 6c 2d | 6b 65 79 62 6f 61 72 64 |r quail-|keyboard|
|000058d0| 2d 6c 61 79 6f 75 74 20 | 71 75 61 69 6c 2d 6b 65 |-layout |quail-ke|
|000058e0| 79 62 6f 61 72 64 2d 6c | 61 79 6f 75 74 2d 73 74 |yboard-l|ayout-st|
|000058f0| 61 6e 64 61 72 64 20 28 | 23 24 20 2e 20 32 31 39 |andard (|#$ . 219|
|00005900| 39 37 29 29 0a 28 62 79 | 74 65 2d 63 6f 64 65 20 |97)).(by|te-code |
|00005910| 22 c0 11 c1 5c 6e 42 12 | c0 87 22 20 5b 31 38 30 |"...\nB.|.." [180|
|00005920| 20 71 75 61 69 6c 2d 6b | 65 79 62 6f 61 72 64 2d | quail-k|eyboard-|
|00005930| 6c 61 79 6f 75 74 2d 6c | 65 6e 20 63 75 72 72 65 |layout-l|en curre|
|00005940| 6e 74 2d 6c 6f 61 64 2d | 6c 69 73 74 5d 20 32 29 |nt-load-|list] 2)|
|00005950| 0a 23 40 31 34 36 20 41 | 6c 69 73 74 20 6f 66 20 |.#@146 A|list of |
|00005960| 6b 65 79 62 6f 61 72 64 | 20 6e 61 6d 65 73 20 61 |keyboard| names a|
|00005970| 6e 64 20 63 6f 72 72 65 | 73 70 6f 6e 64 69 6e 67 |nd corre|sponding|
|00005980| 20 6c 61 79 6f 75 74 20 | 73 74 72 69 6e 67 73 2e | layout |strings.|
|00005990| 0a 53 65 65 20 74 68 65 | 20 64 6f 63 75 6d 65 6e |.See the| documen|
|000059a0| 74 61 74 69 6f 6e 20 6f | 66 20 60 71 75 61 69 6c |tation o|f `quail|
|000059b0| 2d 6b 65 79 62 6f 61 72 | 64 2d 6c 61 79 6f 75 74 |-keyboar|d-layout|
|000059c0| 27 20 66 6f 72 20 74 68 | 65 20 66 6f 72 6d 61 74 |' for th|e format|
|000059d0| 20 6f 66 0a 20 74 68 65 | 20 6c 61 79 6f 75 74 20 | of. the| layout |
|000059e0| 73 74 72 69 6e 67 2e 1f | 0a 28 64 65 66 76 61 72 |string..|.(defvar|
|000059f0| 20 71 75 61 69 6c 2d 6b | 65 79 62 6f 61 72 64 2d | quail-k|eyboard-|
|00005a00| 6c 61 79 6f 75 74 2d 61 | 6c 69 73 74 20 28 62 79 |layout-a|list (by|
|00005a10| 74 65 2d 63 6f 64 65 20 | 22 c0 c1 c2 0b 42 45 87 |te-code |"....BE.|
|00005a20| 22 20 5b 28 22 73 75 6e | 2d 74 79 70 65 33 22 20 |" [("sun|-type3" |
|00005a30| 2e 20 22 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |. "     |        |
|00005a40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005a50| 20 20 20 31 21 32 40 33 | 23 34 24 35 25 36 5e 37 |   1!2@3|#4$5%6^7|
|00005a60| 26 38 2a 39 28 30 29 2d | 5f 3d 2b 5c 5c 7c 60 7e |&8*9(0)-|_=+\\|`~|
|00005a70| 20 20 71 51 77 57 65 45 | 72 52 74 54 79 59 75 55 |  qQwWeE|rRtTyYuU|
|00005a80| 69 49 6f 4f 70 50 5b 7b | 5d 7d 20 20 20 20 20 20 |iIoOpP[{|]}      |
|00005a90| 61 41 73 53 64 44 66 46 | 67 47 68 48 6a 4a 6b 4b |aAsSdDfF|gGhHjJkK|
|00005aa0| 6c 4c 3b 3a 27 5c 22 20 | 20 20 20 20 20 20 20 7a |lL;:'\" |       z|
|00005ab0| 5a 78 58 63 43 76 56 62 | 42 6e 4e 6d 4d 2c 3c 2e |ZxXcCvVb|BnNmM,<.|
|00005ac0| 3e 2f 3f 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |>/?     |        |
|00005ad0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005ae0| 20 20 20 20 20 20 20 20 | 20 22 29 20 28 22 61 74 |        | ") ("at|
|00005af0| 61 72 69 2d 67 65 72 6d | 61 6e 22 20 2e 20 22 20 |ari-germ|an" . " |
|00005b00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 31 |        |       1|
|00005b20| 21 32 5c 22 33 a7 34 24 | 35 25 36 26 37 2f 38 28 |!2\"3.4$|5%6&7/8(|
|00005b30| 39 29 30 3d df 3f 27 60 | 23 5e 20 20 20 20 71 51 |9)0=.?'`|#^    qQ|
|00005b40| 77 57 65 45 72 52 74 54 | 7a 5a 75 55 69 49 6f 4f |wWeErRtT|zZuUiIoO|
|00005b50| 70 50 fc dc 2b 2a 20 20 | 20 20 20 20 61 41 73 53 |pP..+*  |    aAsS|
|00005b60| 64 44 66 46 67 47 68 48 | 6a 4a 6b 4b 6c 4c f6 d6 |dDfFgGhH|jJkKlL..|
|00005b70| e4 c4 7e 7c 20 20 20 20 | 3c 3e 79 59 78 58 63 43 |..~|    |<>yYxXcC|
|00005b80| 76 56 62 42 6e 4e 6d 4d | 2c 3b 2e 3a 2d 5f 20 20 |vVbBnNmM|,;.:-_  |
|00005b90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005bb0| 20 20 20 20 22 29 20 22 | 73 74 61 6e 64 61 72 64 |    ") "|standard|
|00005bc0| 22 20 71 75 61 69 6c 2d | 6b 65 79 62 6f 61 72 64 |" quail-|keyboard|
|00005bd0| 2d 6c 61 79 6f 75 74 2d | 73 74 61 6e 64 61 72 64 |-layout-|standard|
|00005be0| 5d 20 34 29 20 28 23 24 | 20 2e 20 32 32 38 37 31 |] 4) (#$| . 22871|
|00005bf0| 29 29 0a 23 40 33 36 38 | 20 53 65 74 20 74 68 65 |)).#@368| Set the|
|00005c00| 20 63 75 72 72 65 6e 74 | 20 6b 65 79 62 6f 61 72 | current| keyboar|
|00005c10| 64 20 6c 61 79 6f 75 74 | 20 74 6f 20 74 68 65 20 |d layout| to the |
|00005c20| 73 61 6d 65 20 61 73 20 | 6b 65 79 62 6f 61 72 64 |same as |keyboard|
|00005c30| 20 4b 42 44 2d 54 59 50 | 45 2e 0a 0a 53 69 6e 63 | KBD-TYP|E...Sinc|
|00005c40| 65 20 73 6f 6d 65 20 51 | 75 61 69 6c 20 70 61 63 |e some Q|uail pac|
|00005c50| 6b 61 67 65 73 20 64 65 | 70 65 6e 64 73 20 6f 6e |kages de|pends on|
|00005c60| 20 61 20 70 68 79 73 69 | 63 61 6c 20 6c 61 79 6f | a physi|cal layo|
|00005c70| 75 74 20 6f 66 20 6b 65 | 79 73 20 28 6e 6f 74 0a |ut of ke|ys (not.|
|00005c80| 63 68 61 72 61 63 74 65 | 72 73 20 67 65 6e 65 72 |characte|rs gener|
|00005c90| 61 74 65 64 20 62 79 20 | 74 68 65 6d 29 2c 20 74 |ated by |them), t|
|00005ca0| 68 6f 73 65 20 61 72 65 | 20 63 72 65 61 74 65 64 |hose are| created|
|00005cb0| 20 62 79 20 61 73 73 75 | 6d 69 6e 67 20 74 68 65 | by assu|ming the|
|00005cc0| 0a 73 74 61 6e 64 61 72 | 64 20 6c 61 79 6f 75 74 |.standar|d layout|
|00005cd0| 20 64 65 66 69 6e 65 64 | 20 69 6e 20 60 71 75 61 | defined| in `qua|
|00005ce0| 69 6c 2d 6b 65 79 62 6f | 61 72 64 2d 6c 61 79 6f |il-keybo|ard-layo|
|00005cf0| 75 74 2d 73 74 61 6e 64 | 61 72 64 27 2e 20 20 54 |ut-stand|ard'.  T|
|00005d00| 68 69 73 0a 66 75 6e 63 | 74 69 6f 6e 20 74 65 6c |his.func|tion tel|
|00005d10| 6c 73 20 51 75 61 69 6c | 20 73 79 73 74 65 6d 20 |ls Quail| system |
|00005d20| 74 68 65 20 6c 61 79 6f | 75 74 20 6f 66 20 79 6f |the layo|ut of yo|
|00005d30| 75 72 20 6b 65 79 62 6f | 61 72 64 20 73 6f 20 74 |ur keybo|ard so t|
|00005d40| 68 61 74 20 77 68 61 74 | 0a 79 6f 75 20 74 79 70 |hat what|.you typ|
|00005d50| 65 20 69 73 20 63 6f 72 | 72 65 63 74 6c 79 20 68 |e is cor|rectly h|
|00005d60| 61 6e 64 6c 65 64 2e 1f | 0a 28 64 65 66 61 6c 69 |andled..|.(defali|
|00005d70| 61 73 20 27 71 75 61 69 | 6c 2d 73 65 74 2d 6b 65 |as 'quai|l-set-ke|
|00005d80| 79 62 6f 61 72 64 2d 6c | 61 79 6f 75 74 20 23 5b |yboard-l|ayout #[|
|00005d90| 28 6b 62 64 2d 74 79 70 | 65 29 20 22 c0 09 5c 6e |(kbd-typ|e) "..\n|
|00005da0| 5c 22 89 1b ac 85 c4 c5 | 09 5c 22 88 0b 41 89 16 |\"......|.\"..A..|
|00005db0| 06 29 87 22 20 5b 61 73 | 73 6f 63 20 6b 62 64 2d |.)." [as|soc kbd-|
|00005dc0| 74 79 70 65 20 71 75 61 | 69 6c 2d 6b 65 79 62 6f |type qua|il-keybo|
|00005dd0| 61 72 64 2d 6c 61 79 6f | 75 74 2d 61 6c 69 73 74 |ard-layo|ut-alist|
|00005de0| 20 6c 61 79 6f 75 74 20 | 65 72 72 6f 72 20 22 55 | layout |error "U|
|00005df0| 6e 6b 6e 6f 77 6e 20 6b | 65 79 62 6f 61 72 64 20 |nknown k|eyboard |
|00005e00| 74 79 70 65 20 60 25 73 | 27 22 20 71 75 61 69 6c |type `%s|'" quail|
|00005e10| 2d 6b 65 79 62 6f 61 72 | 64 2d 6c 61 79 6f 75 74 |-keyboar|d-layout|
|00005e20| 5d 20 34 20 28 23 24 20 | 2e 20 32 33 35 34 35 29 |] 4 (#$ |. 23545)|
|00005e30| 20 28 6c 65 74 2a 20 28 | 28 63 6f 6d 70 6c 65 74 | (let* (|(complet|
|00005e40| 69 6e 67 2d 69 67 6e 6f | 72 65 2d 63 61 73 65 20 |ing-igno|re-case |
|00005e50| 74 29 20 28 74 79 70 65 | 20 28 63 6f 6d 70 6c 65 |t) (type| (comple|
|00005e60| 74 69 6e 67 2d 72 65 61 | 64 20 22 4b 65 79 62 6f |ting-rea|d "Keybo|
|00005e70| 61 72 64 20 74 79 70 65 | 3a 20 22 20 71 75 61 69 |ard type|: " quai|
|00005e80| 6c 2d 6b 65 79 62 6f 61 | 72 64 2d 6c 61 79 6f 75 |l-keyboa|rd-layou|
|00005e90| 74 2d 61 6c 69 73 74 29 | 29 29 20 28 6c 69 73 74 |t-alist)|)) (list|
|00005ea0| 20 74 79 70 65 29 29 5d | 29 0a 23 40 37 36 20 54 | type))]|).#@76 T|
|00005eb0| 72 61 6e 73 6c 61 74 65 | 20 43 48 41 52 20 61 63 |ranslate| CHAR ac|
|00005ec0| 63 6f 72 64 69 6e 67 20 | 74 6f 20 60 71 75 61 69 |cording |to `quai|
|00005ed0| 6c 2d 6b 65 79 62 6f 61 | 72 64 2d 6c 61 79 6f 75 |l-keyboa|rd-layou|
|00005ee0| 74 27 20 61 6e 64 20 72 | 65 74 75 72 6e 20 74 68 |t' and r|eturn th|
|00005ef0| 65 20 72 65 73 75 6c 74 | 2e 1f 0a 28 64 65 66 61 |e result|...(defa|
|00005f00| 6c 69 61 73 20 27 71 75 | 61 69 6c 2d 6b 65 79 62 |lias 'qu|ail-keyb|
|00005f10| 6f 61 72 64 2d 74 72 61 | 6e 73 6c 61 74 65 20 23 |oard-tra|nslate #|
|00005f20| 5b 28 63 68 29 20 22 08 | 09 61 ab 82 5c 6e 87 c3 |[(ch) ".|.a..\n..|
|00005f30| 1c c3 0d 57 ab 8d 5c 6e | 08 0c 48 55 ac 86 0c 54 |...W..\n|..HU...T|
|00005f40| 89 14 aa 6f 0c 0d 55 ab | 83 5c 6e aa 90 09 0c 48 |...o..U.|.\n....H|
|00005f50| 89 1e 06 c7 55 ab 83 5c | 6e aa 82 0e 06 29 29 87 |....U..\|n....)).|
|00005f60| 22 20 5b 71 75 61 69 6c | 2d 6b 65 79 62 6f 61 72 |" [quail|-keyboar|
|00005f70| 64 2d 6c 61 79 6f 75 74 | 20 71 75 61 69 6c 2d 6b |d-layout| quail-k|
|00005f80| 65 79 62 6f 61 72 64 2d | 6c 61 79 6f 75 74 2d 73 |eyboard-|layout-s|
|00005f90| 74 61 6e 64 61 72 64 20 | 63 68 20 30 20 69 20 71 |tandard |ch 0 i q|
|00005fa0| 75 61 69 6c 2d 6b 65 79 | 62 6f 61 72 64 2d 6c 61 |uail-key|board-la|
|00005fb0| 79 6f 75 74 2d 6c 65 6e | 20 63 68 61 72 20 3f 5c |yout-len| char ?\|
|00005fc0| 20 5d 20 34 20 28 23 24 | 20 2e 20 32 34 32 33 39 | ] 4 (#$| . 24239|
|00005fd0| 29 5d 29 0a 23 40 38 32 | 39 20 52 65 74 75 72 6e |)]).#@82|9 Return|
|00005fe0| 20 74 20 69 66 20 4f 42 | 4a 45 43 54 20 69 73 20 | t if OB|JECT is |
|00005ff0| 61 20 51 75 61 69 6c 20 | 6d 61 70 2e 0a 0a 41 20 |a Quail |map...A |
|00006000| 51 75 61 69 6c 20 6d 61 | 70 20 68 6f 6c 64 73 20 |Quail ma|p holds |
|00006010| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 68 6f 77 20 |informat|ion how |
|00006020| 61 20 70 61 72 74 69 63 | 75 6c 61 72 20 6b 65 79 |a partic|ular key|
|00006030| 20 73 68 6f 75 6c 64 20 | 62 65 20 74 72 61 6e 73 | should |be trans|
|00006040| 6c 61 74 65 64 2e 0a 49 | 74 73 20 66 6f 72 6d 61 |lated..I|ts forma|
|00006050| 74 20 69 73 20 28 54 52 | 41 4e 53 4c 41 54 49 4f |t is (TR|ANSLATIO|
|00006060| 4e 20 2e 20 41 4c 49 53 | 54 29 2e 0a 54 52 41 4e |N . ALIS|T)..TRAN|
|00006070| 53 4c 41 54 49 4f 4e 20 | 69 73 20 65 69 74 68 65 |SLATION |is eithe|
|00006080| 72 20 61 20 63 68 61 72 | 61 63 74 65 72 2c 20 6f |r a char|acter, o|
|00006090| 72 20 61 20 63 6f 6e 73 | 20 28 49 4e 44 45 58 20 |r a cons| (INDEX |
|000060a0| 2e 20 56 45 43 54 4f 52 | 29 2e 0a 49 6e 20 74 68 |. VECTOR|)..In th|
|000060b0| 65 20 6c 61 74 74 65 72 | 20 63 61 73 65 2c 20 65 |e latter| case, e|
|000060c0| 61 63 68 20 65 6c 65 6d | 65 6e 74 20 6f 66 20 56 |ach elem|ent of V|
|000060d0| 45 43 54 4f 52 20 69 73 | 20 61 20 63 61 6e 64 69 |ECTOR is| a candi|
|000060e0| 64 61 74 65 20 66 6f 72 | 20 74 68 65 20 74 72 61 |date for| the tra|
|000060f0| 6e 73 6c 61 74 69 6f 6e | 2c 0a 61 6e 64 20 49 4e |nslation|,.and IN|
|00006100| 44 45 58 20 70 6f 69 6e | 74 73 20 74 68 65 20 63 |DEX poin|ts the c|
|00006110| 75 72 72 65 6e 74 6c 79 | 20 73 65 6c 65 63 74 65 |urrently| selecte|
|00006120| 64 20 74 72 61 6e 73 6c | 61 74 69 6f 6e 2e 0a 0a |d transl|ation...|
|00006130| 41 4c 49 53 54 20 69 73 | 20 6e 6f 72 6d 61 6c 6c |ALIST is| normall|
|00006140| 79 20 61 20 6c 69 73 74 | 20 6f 66 20 65 6c 65 6d |y a list| of elem|
|00006150| 65 6e 74 73 20 74 68 61 | 74 20 6c 6f 6f 6b 20 6c |ents tha|t look l|
|00006160| 69 6b 65 20 28 43 48 41 | 52 20 2e 20 44 45 46 4e |ike (CHA|R . DEFN|
|00006170| 29 2c 0a 77 68 65 72 65 | 20 44 45 46 4e 20 69 73 |),.where| DEFN is|
|00006180| 20 61 6e 6f 74 68 65 72 | 20 51 75 61 69 6c 20 6d | another| Quail m|
|00006190| 61 70 20 66 6f 72 20 61 | 20 6c 6f 6e 67 65 72 20 |ap for a| longer |
|000061a0| 6b 65 79 20 28 43 48 41 | 52 20 61 64 64 65 64 20 |key (CHA|R added |
|000061b0| 74 6f 20 74 68 65 0a 63 | 75 72 72 65 6e 74 20 6b |to the.c|urrent k|
|000061c0| 65 79 29 2e 20 20 49 74 | 20 6d 61 79 20 61 6c 73 |ey).  It| may als|
|000061d0| 6f 20 62 65 20 61 20 73 | 79 6d 62 6f 6c 20 6f 66 |o be a s|ymbol of|
|000061e0| 20 61 20 66 75 6e 63 74 | 69 6f 6e 20 77 68 69 63 | a funct|ion whic|
|000061f0| 68 20 72 65 74 75 72 6e | 73 20 61 6e 0a 61 6c 69 |h return|s an.ali|
|00006200| 73 74 20 6f 66 20 74 68 | 65 20 61 62 6f 76 65 20 |st of th|e above |
|00006210| 66 6f 72 6d 61 74 2e 0a | 0a 4a 75 73 74 20 61 66 |format..|.Just af|
|00006220| 74 65 72 20 61 20 51 75 | 61 69 6c 20 70 61 63 6b |ter a Qu|ail pack|
|00006230| 61 67 65 20 69 73 20 72 | 65 61 64 2c 20 54 52 41 |age is r|ead, TRA|
|00006240| 4e 53 4c 41 54 49 4f 4e | 20 6d 61 79 20 62 65 20 |NSLATION| may be |
|00006250| 61 20 73 74 72 69 6e 67 | 20 6f 72 20 61 0a 76 65 |a string| or a.ve|
|00006260| 63 74 6f 72 2e 20 20 54 | 68 65 6e 20 65 61 63 68 |ctor.  T|hen each|
|00006270| 20 65 6c 65 6d 65 6e 74 | 20 6f 66 20 74 68 65 20 | element| of the |
|00006280| 73 74 72 69 6e 67 20 6f | 72 20 76 65 63 74 6f 72 |string o|r vector|
|00006290| 20 69 73 20 61 20 63 61 | 6e 64 69 64 61 74 65 20 | is a ca|ndidate |
|000062a0| 66 6f 72 0a 74 68 65 20 | 74 72 61 6e 73 6c 61 74 |for.the |translat|
|000062b0| 69 6f 6e 2e 20 20 54 68 | 65 73 65 20 6f 62 6a 65 |ion.  Th|ese obje|
|000062c0| 63 74 73 20 61 72 65 20 | 74 72 61 6e 73 66 6f 72 |cts are |transfor|
|000062d0| 6d 65 64 20 74 6f 20 63 | 6f 6e 73 20 63 65 6c 6c |med to c|ons cell|
|000062e0| 73 20 69 6e 20 74 68 65 | 0a 66 6f 72 6d 61 74 20 |s in the|.format |
|000062f0| 28 49 4e 44 45 58 20 2e | 20 56 45 43 54 4f 52 29 |(INDEX .| VECTOR)|
|00006300| 2c 20 61 73 20 64 65 73 | 63 72 69 62 65 64 20 61 |, as des|cribed a|
|00006310| 62 6f 76 65 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |bove...(|defalias|
|00006320| 20 27 71 75 61 69 6c 2d | 6d 61 70 2d 70 20 23 5b | 'quail-|map-p #[|
|00006330| 28 6f 62 6a 65 63 74 29 | 20 22 08 3a ad b4 08 40 |(object)| ".:...@|
|00006340| 19 c2 09 21 ae 9a 09 3f | ae 96 c3 09 21 ae 91 09 |...!...?|....!...|
|00006350| 3b ae 8d 09 39 ae 89 09 | 3a ad 85 c3 09 41 21 3f |;...9...|:....A!?|
|00006360| 29 ad 8f 08 41 89 1c 3c | ab 85 0c 40 3a ae 82 0c |)...A..<|...@:...|
|00006370| 39 29 87 22 20 5b 6f 62 | 6a 65 63 74 20 74 72 61 |9)." [ob|ject tra|
|00006380| 6e 73 6c 61 74 69 6f 6e | 20 63 68 61 72 61 63 74 |nslation| charact|
|00006390| 65 72 70 20 76 65 63 74 | 6f 72 70 20 61 6c 69 73 |erp vect|orp alis|
|000063a0| 74 5d 20 33 20 28 23 24 | 20 2e 20 32 34 35 33 38 |t] 3 (#$| . 24538|
|000063b0| 29 5d 29 0a 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |)]).(byt|e-code "|
|000063c0| c0 c1 4e c2 73 ac 85 c3 | c4 c0 5c 22 88 c5 c0 c1 |..N.s...|..\"....|
|000063d0| c6 23 87 22 20 5b 71 75 | 61 69 6c 2d 6d 61 70 2d |.#." [qu|ail-map-|
|000063e0| 70 20 62 79 74 65 2d 6f | 70 74 69 6d 69 7a 65 72 |p byte-o|ptimizer|
|000063f0| 20 28 6e 69 6c 20 62 79 | 74 65 2d 63 6f 6d 70 69 | (nil by|te-compi|
+--------+-------------------------+-------------------------+--------+--------+